Tweak verbose logging of directories in computeblocklists/extractbuild

Author: mlschroe

computeblocklists

@@ -280,7 +280,7 @@ while (1) {
     print "l $n $c\n";
     next;
   } elsif (-d _) {
-    print STDERR "$file\n" if $opt_verbose && $opt_verbose > 1;
+    print STDERR "$file\n" if $opt_verbose && ($opt_verbose > 1 || $file =~ /^KIWI\/[^\/]*$/);
     print "d $n\n";
     next;
   } elsif (! -f _) {

extractbuild

@@ -81,7 +81,7 @@ while (<S>) {
     die("file without directory: $file\n") unless $done{$1} && $done{$1} eq 'd';
   }
   if ($filetype eq 'd') {	# dir
-    print "$file\n" if $opt_verbose && !($opt_verbose == 1 && $file =~ /^KIWI\/.*\//);
+    print "$file\n" if $opt_verbose && ($opt_verbose > 1 || $file =~ /^KIWI\/[^\/]*$/);
     mkdir($file) || die("mkdir $file: $!\n");
     $done{$file} = 'd';
     next;