diff options
| author | ivan <ivan> | 1998-12-17 06:17:12 +0000 |
|---|---|---|
| committer | ivan <ivan> | 1998-12-17 06:17:12 +0000 |
| commit | b6869885e52ea0e18009350bf59d4eca8aafb0eb (patch) | |
| tree | a358f148707870a42415ef2cec164bfa379042dd /htdocs/edit/part_pkg.cgi | |
| parent | 19a2ec12e14b0fba549e6b31a1fd92eedcc5c350 (diff) | |
fix double // in relative URLs, s/CGI::Base/CGI/;
Diffstat (limited to 'htdocs/edit/part_pkg.cgi')
| -rwxr-xr-x | htdocs/edit/part_pkg.cgi | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/htdocs/edit/part_pkg.cgi b/htdocs/edit/part_pkg.cgi index 7fd029b03..c30a85965 100755 --- a/htdocs/edit/part_pkg.cgi +++ b/htdocs/edit/part_pkg.cgi @@ -1,6 +1,6 @@ #!/usr/bin/perl -Tw # -# $Id: part_pkg.cgi,v 1.5 1998-11-21 07:12:26 ivan Exp $ +# $Id: part_pkg.cgi,v 1.6 1998-12-17 06:17:05 ivan Exp $ # # part_pkg.cgi: Add/Edit package (output form) # @@ -13,7 +13,10 @@ # use FS::CGI, added inline documentation ivan@sisd.com 98-jul-12 # # $Log: part_pkg.cgi,v $ -# Revision 1.5 1998-11-21 07:12:26 ivan +# Revision 1.6 1998-12-17 06:17:05 ivan +# fix double // in relative URLs, s/CGI::Base/CGI/; +# +# Revision 1.5 1998/11/21 07:12:26 ivan # *** empty log message *** # # Revision 1.4 1998/11/21 07:11:08 ivan @@ -69,8 +72,8 @@ my($hashref)=$part_pkg->hashref; print $cgi->header, header("$action Package Definition", menubar( 'Main Menu' => popurl(2), - 'View all packages' => popurl(2). '/browse/part_pkg.cgi', -)), '<FORM ACTION="', popurl(1), '/process/part_pkg.cgi" METHOD=POST>'; + 'View all packages' => popurl(2). 'browse/part_pkg.cgi', +)), '<FORM ACTION="', popurl(1), 'process/part_pkg.cgi" METHOD=POST>'; if ( $cgi->param('clone') ) { print qq!<INPUT TYPE="hidden" NAME="clone" VALUE="!, $cgi->param('clone'), qq!">!; |