Changeset 31028 for trunk/ippScripts/scripts/minidvodb_merge.pl

Timestamp:

Mar 23, 2011, 1:42:55 PM (15 years ago)

Author:

heather

Message:

This fixes the additions to the merge script (dvoverify stuff). It's tested, it
works.

File:

• trunk/ippScripts/scripts/minidvodb_merge.pl (modified) (3 diffs)

trunk/ippScripts/scripts/minidvodb_merge.pl

@@ -148 +148 @@
                 &my_die("Unable to perform dvoverify: $error_code", $mergedvodb, $error_code);
             }
-            $dtime_dvoverify = 86400.0*(DateTime->now->mjd - $mjd_dvoverify_start);   # MJD of starting script
-            print "dvoverify time $dtime_dvoverify\n";
+            $dtime_verify = 86400.0*(DateTime->now->mjd - $mjd_dvoverify_start);   # MJD of starting script
+            print "dvoverify time $dtime_verify\n";
         }
 
@@ -232 +232 @@
             $command .= " -dtime_merge $dtime_merge" if defined $dtime_merge;
             $command .= " -dtime_script $dtime_script" if defined $dtime_script;
-            $command .= " -dtime_verify $dtime_dvoverify" if defined $dtime_dvoverify;
+            $command .= " -dtime_verify $dtime_verify" if defined $dtime_verify;
             $command .= " -dbname $dbname" if defined $dbname;
             #print $command;
@@ -273 +273 @@
         $command .= " -dtime_merge $dtime_merge" if defined $dtime_merge;
     $command .= " -dtime_script $dtime_script" if defined $dtime_script;
-    $command .= " -dtime_verify $dtime_dvoverify" if defined $dtime_dvoverify;
+    $command .= " -dtime_verify $dtime_verify" if defined $dtime_verify;
         $command .= " -dbname $dbname" if defined $dbname;