Changeset 33108 for trunk/ippScripts/scripts/lap_science.pl

Timestamp:

Jan 17, 2012, 2:17:15 PM (15 years ago)

Author:

watersc1

Message:

Fix bug where the cleanup could run multiple times without actually setting the state correctly.

File:

• trunk/ippScripts/scripts/lap_science.pl (modified) (1 diff)

trunk/ippScripts/scripts/lap_science.pl

@@ -1310 +1310 @@
     if (@$stdout_buf == 0) {
         # Nothing to do.
+        $command = "$laptool -updaterun -lap_id $lap_id";
+        $command .= " -dbname $dbname " if defined $dbname;
+        $command .= " -set_state done ";
+        ($success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
+            run(command => $command, verbose => $verbose);
+        unless ($success) {
+            $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
+            &my_die("Unable to perform laptool -updaterun: $error_code", $lap_id);
+        }
+
         return(0);
     }