Cosmetic fix of the displayed `finished:' progress messages.
authorjkratoch <>
Sun, 9 Aug 2009 10:37:11 +0000 (10:37 +0000)
committerjkratoch <>
Sun, 9 Aug 2009 10:37:11 +0000 (10:37 +0000)
bin/hammock

index e1640ee..8f7a8b9 100755 (executable)
@@ -197,8 +197,9 @@ while (@distrouse || keys(%child)) {
       $rpmbuild.=q{ --dbpath $PWD --nodeps};
     }
 
-    my $distrodir="$dir/$distro";
-    $distrodir.="-$target" if $target;
+    my $distrodirbase=$distro;
+    $distrodirbase.="-$target" if $target;
+    my $distrodir="$dir/$distrodirbase";
     newdir $distrodir;
     $log="$distrodir/log";
     my $out="$distrodir/out";
@@ -207,7 +208,7 @@ while (@distrouse || keys(%child)) {
       my $pid=fork();
       die if !defined $pid;
       if ($pid) {
-       $child{$pid}=$distro;
+       $child{$pid}=$distrodirbase;
        next;
       }
     }