skip comment out binary rpm
authorZhang Qiang <qiang.z.zhang@intel.com>
Fri, 11 Oct 2013 03:16:49 +0000 (11:16 +0800)
committerZhang Qiang <qiang.z.zhang@intel.com>
Fri, 11 Oct 2013 03:16:49 +0000 (11:16 +0800)
If packages are commented out using '#', depanneur will skip them.

Change-Id: Id9ab480526bd434edc721b23fbb8041597860c32

depanneur

index d32927381ec14ea515a1788503e2e201169621ce..89b81adbd660ff529abccc19268fb61b91d25465 100755 (executable)
--- a/depanneur
+++ b/depanneur
@@ -1481,7 +1481,7 @@ sub get_binary_list() {
             die "Cant open binary list file $binary_from_file: $!\n";
         my @lines = <$file>;
         chomp(@lines);
-        push @bins, @lines;
+        push @bins, grep {!/^#.*$/} @lines;
     }
 
     if ($binarylist ne "") {