summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2003-04-18 03:29:25 +0000
committerivan <ivan>2003-04-18 03:29:25 +0000
commit3e050cb4a4581583491921f776b41d6aefd49db3 (patch)
tree1985e953ec68983cf1aaa25f937c3abbb53210c0
parent2a0fb861aa1ec98db205b0b427e8a73e1568eb5f (diff)
YA pg7.3 fix
-rwxr-xr-xhttemplate/view/svc_acct.cgi6
1 files changed, 4 insertions, 2 deletions
diff --git a/httemplate/view/svc_acct.cgi b/httemplate/view/svc_acct.cgi
index 47a93586d..a5cf02776 100755
--- a/httemplate/view/svc_acct.cgi
+++ b/httemplate/view/svc_acct.cgi
@@ -1,4 +1,4 @@
-<!-- mason kludge -->
+<-- mason kludge -->
<%
my $conf = new FS::Conf;
@@ -145,7 +145,9 @@ if ( $conf->exists('security_phrase') ) {
$svc_acct->sec_phrase. '</TD></TR>';
}
-my $svc_acct_pop = qsearchs('svc_acct_pop',{'popnum'=>$svc_acct->popnum});
+my $svc_acct_pop = $svc_acct->popnum
+ ? qsearchs('svc_acct_pop',{'popnum'=>$svc_acct->popnum})
+ : '';
print "<TR><TD ALIGN=\"right\">Access number</TD>".
"<TD BGCOLOR=\"#ffffff\">". $svc_acct_pop->text. '</TD></TR>'
if $svc_acct_pop;