Changeset 36882

Timestamp:

Jun 16, 2014, 1:42:14 PM (12 years ago)

Author:

bills

Message:

when psmkreq fails print out the command line to stderr

File:

• trunk/pstamp/scripts/pstamp_webrequest.pl (modified) (1 diff)

trunk/pstamp/scripts/pstamp_webrequest.pl

@@ -93 +93 @@
     my $command = "$psmkreq --req_name $request_name  --output $request_file @ARGV";
 
+if (0) {
+open DEBUG, ">>/tmp/pstamp.debug.log";
+print DEBUG "\ncommand is: $command\n";
+close DEBUG;
+}
+
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
         run(command => $command, verbose => $verbose);
     unless ($success) {
         print STDERR @$stderr_buf;
+        print STDERR "\ncommand was: $command\n";
         die("Unable to perform psmkreq: $error_code");
     }