Changeset 15169 for gsdl/trunk
- Timestamp:
- 2008-04-02T18:19:37+13:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/bin/script/replace_srcdoc_with_html.pl
r15153 r15169 152 152 #return 0; # error code 0 for false <- NO, needs to die, not return! 153 153 } 154 #else 154 #else: 155 155 156 156 # now, find out what to move: … … 186 186 die "File $new_file already exists. Deleting generated file.\n"; 187 187 } 188 188 189 189 # Now we know we have no file name collisions 190 190 # use util to move it all to the import directory where the original file is located 191 #&util::mv($output_filename, &util::filename_cat($import_dir, $tmp_name.$ext)); # doesn't work192 #&util::mv($output_filename, $import_dir); # doesn't work191 #&util::mv($output_filename, &util::filename_cat($import_dir, $tmp_name.$ext)); # doesn't work 192 #&util::mv($output_filename, $import_dir); # doesn't work 193 193 &util::cp($output_filename, $import_dir); 194 194 &util::rm($output_filename); 195 195 if(-e $assoc_folder) { # move any associated folders too 196 196 #print STDERR "****Folder for associated files is $assoc_folder\n"; 197 #&util::mv($assoc_folder, $import_dir); # doesn't work for me197 #&util::mv($assoc_folder, $import_dir); # doesn't work for me 198 198 &util::cp_r($assoc_folder, $import_dir); 199 199 &util::rm_r($assoc_folder); 200 } 200 } 201 201 202 202 # Now we can remove the source doc permanently (there are no assocdirs for source doc) 203 203 &util::rm($filename); 204 204 205 # need this output statement here, as GShell.java's runRemote() sets status to CANCELLED 206 # if there is no output! (Therefore, it only had this adverse affect when running GSDL remotely) 207 print STDOUT "success\n"; 205 208 } 206 209 &main(@ARGV);
Note:
See TracChangeset
for help on using the changeset viewer.