Changeset 26094 for trunk/ippScripts/scripts/dist_cleanup.pl

Timestamp:

Nov 10, 2009, 2:16:46 PM (16 years ago)

Author:

bills

Message:

don't try and parse empty metadata config docs. It's not an error for a run
to have no components or filesets

File:

• trunk/ippScripts/scripts/dist_cleanup.pl (modified) (2 diffs)

trunk/ippScripts/scripts/dist_cleanup.pl

@@ -75 +75 @@
         &my_die("Unable to perform $command: $error_code", $dist_id, $error_code);
     }
-    my $metadata = $mdcParser->parse (join "", @$stdout_buf) or
-        &my_die("Unable to parse metadata config doc", $dist_id, $error_code);
-
-    $filesets = parse_md_list($metadata);
+    my $stdout = join "", @$stdout_buf;
+    if ($stdout) {
+        my $metadata = $mdcParser->parse ($stdout) or
+            &my_die("Unable to parse metadata config doc", $dist_id, $PS_EXIT_UNKNOWN_ERROR);
+
+        $filesets = parse_md_list($metadata);
+    }
 }
 
@@ -133 +136 @@
         &my_die("Unable to perform $command: $error_code", $dist_id, $error_code);
     }
-    my $metadata = $mdcParser->parse (join "", @$stdout_buf) or
-        &my_die("Unable to parse metadata config doc", $dist_id, $error_code);
-
-    $files = parse_md_list($metadata);
+    my $stdout = join "", @$stdout_buf;
+    if ($stdout) {
+        my $metadata = $mdcParser->parse ($stdout) or
+            &my_die("Unable to parse metadata config doc", $dist_id, $error_code);
+
+        $files = parse_md_list($metadata);
+    }
 }