X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fview%2Fsvc_www.cgi;h=6c8cd6a0b927a8a4977875da2daece07cc60b794;hb=673b9a458d9138523026963df6fa3b4683e09bae;hp=2980f846b6a7107a567329131058bad744ca5d15;hpb=f7fd2a3e34da751cbc02bbf215e99c6dc89adc15;p=freeside.git diff --git a/httemplate/view/svc_www.cgi b/httemplate/view/svc_www.cgi index 2980f846b..6c8cd6a0b 100644 --- a/httemplate/view/svc_www.cgi +++ b/httemplate/view/svc_www.cgi @@ -21,9 +21,13 @@ if ($pkgnum) { #eofalse my $usersvc = $svc_www->usersvc; -my $svc_acct = qsearchs('svc_acct', { 'svcnum' => $usersvc } ) - or die "svc_www: Unknown usersvc $usersvc"; -my $email = $svc_acct->email; +my $svc_acct = ''; +my $email = ''; +if ( $usersvc ) { + $svc_acct = qsearchs('svc_acct', { 'svcnum' => $usersvc } ) + or die "svc_www: Unknown usersvc $usersvc"; + $email = $svc_acct->email; +} my $domain_record = qsearchs('domain_record', { 'recnum' => $svc_www->recnum } ) or die "svc_www: Unknown recnum ". $svc_www->recnum; @@ -46,7 +50,15 @@ print header('Website View', menubar( qq!Website name!. qq!$www!. qq!Account!. - qq!$email!; + qq!!; + +if ( $usersvc ) { + print qq!$email!; +} else { + print '(none)'; +} + +print ''; foreach (sort { $a cmp $b } $svc_www->virtual_fields) { print $svc_www->pvf($_)->widget('HTML', 'view', $svc_www->getfield($_)),