X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fprospect_main.pm;h=67e91cf994fc2b674bdd968736ca075496eb1882;hp=9472996935b5a82aefee9bfd2bc7b7a06d0a23f7;hb=e0b6fe25cca1e2ff566cc0765f6c9fa24ed66ba8;hpb=6452a4779e14c03a9f48bcbc68eef25c0391e93e

diff --git a/FS/FS/prospect_main.pm b/FS/FS/prospect_main.pm
index 947299693..67e91cf99 100644
--- a/FS/FS/prospect_main.pm
+++ b/FS/FS/prospect_main.pm
@@ -270,8 +270,11 @@ sub name {
   my $self = shift;
   return $self->company if $self->company;
 
-  my $contact = ($self->prospect_contact)[0]->contact; #first contact?  good enough for now
-  return $contact->line if $contact;
+  my $prospect_contact = ($self->prospect_contact)[0]; #first contact?  good enough for now
+  my $contact = $prospect_contact->contact if $prospect_contact;
+  return $contact->line if $prospect_contact && $contact;
+
+  #address?
 
   'Prospect #'. $self->prospectnum;
 }