Changeset 117 in ProjectBuilder for devel/pb/bin

Timestamp:

Sep 7, 2007, 7:25:22 PM (18 years ago)

Author:

Bruno Cornec

Message:

Better src printing

File:

• devel/pb/bin/pb (modified) (2 diffs)

devel/pb/bin/pb

@@ -405 +405 @@
             # $src = "$src $ENV{'PBDESTDIR'}/pbscript"
         }
-        print $LOG "$cmt: $src\n" if ($debug >= 0);
         push @src, $src;
     }
+    $src = join(' ',@src);
+    print $LOG "$cmt: $src\n" if ($debug >= 0);
     my ($sshhost,$sshlogin,$sshdir,$sshport) = pb_conf_get($host,$login,$dir,$port);
     my $mac = "$sshlogin->{$ENV{'PBPROJ'}}\@$sshhost->{$ENV{'PBPROJ'}}";
@@ -421 +422 @@
     }
     $port = $sshport->{$ENV{'PBPROJ'}};
-    $src = join(' ',@src);
     pb_system("ssh -q -p $port $mac \"mkdir -p $tdir ; cd $tdir ; rm -f $src\"","Preparing $tdir on $mac");
     pb_system("scp -p -P $port $src $mac:$tdir","$cmt delivery in $tdir on $mac");