Changeset 9500

Timestamp:

Oct 11, 2006, 4:38:19 PM (20 years ago)

Author:

jhoblitt

Message:

sync END block with mainline

File:

• branches/cache/ippScripts/scripts/phase0_imfile.pl (modified) (2 diffs)

branches/cache/ippScripts/scripts/phase0_imfile.pl

@@ -91 +91 @@
 {
     my $command = "$ppStats $uri -recipe PPSTATS " . RECIPE; # Command to run ppStats
-
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
         cache_run(command => $command, verbose => 1);
@@ -150 +149 @@
 # Pau.
 
-END { system("sync") == 0 or die "failed to execute sync: $!" }
+END {
+    my $exit = $?;
+    system("sync") == 0 or die "failed to execute sync: $!";
+    $? = $exit;
+}
 
 __END__