explicit & for table/itable/ntable
[freeside.git] / htdocs / view / cust_pkg.cgi
index bf7f29b..6bb2948 100755 (executable)
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -Tw
 #
-# $Id: cust_pkg.cgi,v 1.9 1999-04-08 12:00:19 ivan Exp $
+# $Id: cust_pkg.cgi,v 1.10 1999-04-09 03:52:55 ivan Exp $
 #
 # Usage: cust_pkg.cgi pkgnum
 #        http://server.name/path/cust_pkg.cgi?pkgnum
 # no FS::Search ivan@sisd.com 98-mar-7
 # 
 # $Log: cust_pkg.cgi,v $
-# Revision 1.9  1999-04-08 12:00:19  ivan
+# Revision 1.10  1999-04-09 03:52:55  ivan
+# explicit & for table/itable/ntable
+#
+# Revision 1.9  1999/04/08 12:00:19  ivan
 # aesthetic update
 #
 # Revision 1.8  1999/02/28 00:04:01  ivan
@@ -106,7 +109,7 @@ print ' (<A HREF="'. popurl(2). 'misc/susp_pkg.cgi?'. $pkgnum.
 print ' (<A HREF="'. popurl(2). 'misc/cancel_pkg.cgi?'. $pkgnum.
       '">cancel</A>)' unless $cancel;
 
-print ntable("#c0c0c0"), '<TR><TD>', ntable("#c0c0c0",2),
+print &ntable("#c0c0c0"), '<TR><TD>', &ntable("#c0c0c0",2),
       '<TR><TD ALIGN="right">Package number</TD><TD BGCOLOR="#ffffff">',
       $pkgnum, '</TD></TR>',
       '<TR><TD ALIGN="right">Package</TD><TD BGCOLOR="#ffffff">',
@@ -139,7 +142,7 @@ print  '<TR><TD ALIGN="right">Order taker</TD><TD BGCOLOR="#ffffff">',
 unless ($cancel) {
 
   #services
-  print '<BR>Service Information', table,
+  print '<BR>Service Information', &table,
   ;
 
   #list of services this pkgpart includes