path: root/FS/FS/Quotable_Mixin.pm

package FS::Quotable_Mixin;

use strict;
use FS::Record qw( qsearch ); #qsearchs );
use FS::quotation;

sub quotation {
  my $self = shift;
  my $pk = $self->primary_key;
  qsearch('quotation', { $pk => $self->$pk() } );
}

1;