Changeset 30118 for branches/czw_branch/20101203/ippToPsps/perl/checkOdmStatus.pl

Timestamp:

Dec 20, 2010, 2:30:45 PM (16 years ago)

Author:

watersc1

Message:

Attempting to bring branch in sync with trunk

Location:

branches/czw_branch/20101203

Files:

• . (modified) (1 prop)
• ippToPsps/perl/checkOdmStatus.pl (modified) (2 diffs)

branches/czw_branch/20101203/ippToPsps/perl/checkOdmStatus.pl

@@ -39 +39 @@
         );
 
+if (@ARGV) {
+    print "* UNKNKOWN: option                          @ARGV\n";
+}
 if (!defined $product) {
     print "* OPTIONAL: a datastore product name            -p <name>\n";
@@ -159 +162 @@
         $numBatchesToCheck++;
 
-        # if not merged then update by polling ODM for status
+        # if not merged or failed load, then update by polling ODM for status
         if (!$merged && !$loadFailed) {
-
             if (checkODM($batch->getName(), \$loadedToOdm, \$loadFailed, \$mergeWorthy, \$merged)) {