X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcontact_Mixin.pm;h=6e8f315b9d573fb31feed958e47c6a36549393dd;hp=33cd3509aef1d59675be6a67455f215bf9f1d511;hb=5372897f367498972c96f5494e142e6e11b29eb8;hpb=2e761a72c380dc9d7320ccd822cfe8476534b369 diff --git a/FS/FS/contact_Mixin.pm b/FS/FS/contact_Mixin.pm index 33cd3509a..6e8f315b9 100644 --- a/FS/FS/contact_Mixin.pm +++ b/FS/FS/contact_Mixin.pm @@ -4,13 +4,13 @@ use strict; use FS::Record qw( qsearchs ); use FS::contact; -=item contact +=item contact_obj Returns the contact object, if any (see L). =cut -sub contact { +sub contact_obj { my $self = shift; return '' unless $self->contactnum; qsearchs( 'contact', { 'contactnum' => $self->contactnum } );