Changeset 15169 for gsdl/trunk

Timestamp:

2008-04-02T18:19:37+13:00 (16 years ago)

Author:

ak19

Message:

Most important change: need this script to print out some message to STDOUT (or STDERR) when it's successful, else GShell.java's runRemote() sets status to CANCELLED if there's no output (even when execution went well).

File:

• gsdl/trunk/bin/script/replace_srcdoc_with_html.pl (modified) (2 diffs)

gsdl/trunk/bin/script/replace_srcdoc_with_html.pl

@@ -152 +152 @@
     #return 0; # error code 0 for false <- NO, needs to die, not return!
     }
-    #else
+    #else:
 
     # now, find out what to move:
@@ -186 +186 @@
     die "File $new_file already exists. Deleting generated file.\n";
     }
-   
+
     # Now we know we have no file name collisions
     # use util to move it all to the import directory where the original file is located
-    #&util::mv($output_filename, &util::filename_cat($import_dir, $tmp_name.$ext)); # doesn't work
-    #&util::mv($output_filename, $import_dir); # doesn't work
+       #&util::mv($output_filename, &util::filename_cat($import_dir, $tmp_name.$ext)); # doesn't work
+       #&util::mv($output_filename, $import_dir); # doesn't work
     &util::cp($output_filename, $import_dir);
     &util::rm($output_filename);
     if(-e $assoc_folder) { # move any associated folders too
     #print STDERR "****Folder for associated files is $assoc_folder\n";
-    #&util::mv($assoc_folder, $import_dir); # doesn't work for me
+        #&util::mv($assoc_folder, $import_dir); # doesn't work for me
     &util::cp_r($assoc_folder, $import_dir);
     &util::rm_r($assoc_folder);
-    }
+    }   
 
     # Now we can remove the source doc permanently (there are no assocdirs for source doc)
     &util::rm($filename);
-    
+
+    # need this output statement here, as GShell.java's runRemote() sets status to CANCELLED
+    # if there is no output! (Therefore, it only had this adverse affect when running GSDL remotely) 
+    print STDOUT "success\n";
 }
 &main(@ARGV);