X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=htdocs%2Fmisc%2Fprocess%2Flink.cgi;fp=htdocs%2Fmisc%2Fprocess%2Flink.cgi;h=7d6bd506fdd5ec96e89b8997904c43ffe6822f67;hb=09be823788a1b5c1e30e344a933410966a8c7ea8;hp=eec43cf477b1aaa277fa04f7231418d2e3d559a7;hpb=e890290677daab75e0ce28d5679baddb8a997a8e;p=freeside.git diff --git a/htdocs/misc/process/link.cgi b/htdocs/misc/process/link.cgi index eec43cf47..7d6bd506f 100755 --- a/htdocs/misc/process/link.cgi +++ b/htdocs/misc/process/link.cgi @@ -1,6 +1,6 @@ #!/usr/bin/perl -Tw # -# $Id: link.cgi,v 1.5 1999-04-15 14:09:17 ivan Exp $ +# $Id: link.cgi,v 1.6 2000-07-17 17:59:33 ivan Exp $ # # ivan@voicenet.com 97-feb-5 # @@ -12,7 +12,10 @@ # can also link on some other fields now (about time) ivan@sisd.com 98-jun-24 # # $Log: link.cgi,v $ -# Revision 1.5 1999-04-15 14:09:17 ivan +# Revision 1.6 2000-07-17 17:59:33 ivan +# oops +# +# Revision 1.5 1999/04/15 14:09:17 ivan # get rid of top-level my() variables # # Revision 1.4 1999/02/07 09:59:35 ivan @@ -30,7 +33,7 @@ use strict; use vars qw ( $cgi $old $new $error $pkgnum $svcpart $svcnum ); use CGI; use CGI::Carp qw(fatalsToBrowser); -use FS::CGI qw(popurl idiot); +use FS::CGI qw(popurl idiot eidiot); use FS::UID qw(cgisuidsetup); use FS::cust_svc; use FS::Record qw(qsearchs);