From: ivan <ivan>
Date: Tue, 10 Aug 1999 11:15:45 +0000 (+0000)
Subject: corrected a misleading comment
X-Git-Tag: freeside_1_2_2~17
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=40e0a5460891d0b9e49233a1717b5914318a4289

corrected a misleading comment
---

diff --git a/htdocs/edit/cust_main.cgi b/htdocs/edit/cust_main.cgi
index e2e2d334d..612d137b2 100755
--- a/htdocs/edit/cust_main.cgi
+++ b/htdocs/edit/cust_main.cgi
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -Tw
 #
-# $Id: cust_main.cgi,v 1.16 1999-07-20 10:37:05 ivan Exp $
+# $Id: cust_main.cgi,v 1.17 1999-08-10 11:15:45 ivan Exp $
 #
 # Usage: cust_main.cgi custnum
 #        http://server.name/path/cust_main.cgi?custnum
@@ -38,9 +38,8 @@
 # fixed one missed day->daytime ivan@sisd.com 98-jul-13
 #
 # $Log: cust_main.cgi,v $
-# Revision 1.16  1999-07-20 10:37:05  ivan
-# cleaned up the new one-screen signup bits in htdocs/edit/cust_main.cgi to
-# prepare for a signup server
+# Revision 1.17  1999-08-10 11:15:45  ivan
+# corrected a misleading comment
 #
 # Revision 1.15  1999/04/14 13:14:54  ivan
 # configuration option to edit referrals of existing customers
@@ -339,7 +338,7 @@ unless ( $custnum ) {
   #false laziness, copied from FS::cust_pkg::order
   my $pkgpart;
   if ( scalar(@agents) == 1 ) {
-    # $pkgpart->{$pkgpart} is true iff $custnum may purchase $pkgpart
+    # $pkgpart->{PKGPART} is true iff $custnum may purchase $pkgpart
     my($agent)=qsearchs('agent',{'agentnum'=> $agentnum });
     $pkgpart = $agent->pkgpart_hashref;
   } else {