} elsif ( $type eq 'R' ) {
return ($recur);
} else {
- return ($setup, $recur);
+ #return ($setup, $recur);
+ return ($self);
}
}
}
+=item cust_main
+
+Returns the customer (L<FS::cust_main> object).
+
+=cut
+
+sub cust_main {
+ my $self = shift;
+ my $quotation = FS::quotation->by_key($self->quotationnum) or return '';
+ $quotation->cust_main;
+}
+
=back
=head1 BUGS