- Timestamp:
- 2004-07-22T14:24:44+12:00 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/cgi-bin/launch
r7769 r7800 108 108 my ($col,$cgi) = @_; 109 109 110 if ((!defined $col) || ($col =~ m/^\s*$/)) { 111 print "Content-type:text/plain\n\n"; 112 print "Error: No collection name specified\n"; 113 exit; 114 } 115 110 116 chdir("collect"); 111 117 … … 135 141 136 142 my $col = clean_param($cgi,"c"); 137 if ((!defined $col) || ($col =~ m/^\s*$/)) {138 print "Content-type:text/plain\n\n";139 print "Error: No collection name specified\n";140 exit;141 }142 143 143 144 $cgi->delete("c");
Note:
See TracChangeset
for help on using the changeset viewer.