Changeset 111 in ProjectBuilder for devel/pb/bin

Timestamp:

Sep 6, 2007, 2:28:13 AM (18 years ago)

Author:

Bruno Cornec

Message:

Fix ssh port handling which was wrong + space for test

File:

• devel/pb/bin/pb (modified) (1 diff)

devel/pb/bin/pb

@@ -419 +419 @@
         return;
     }
+    $port = $sshport->{$ENV{'PBPROJ'}};
     $src = join(' ',@src);
-    pb_system("ssh -q $mac \"mkdir -p $tdir ; cd $tdir ; rm -f $src\"","Preparing $tdir on $mac");
-    pb_system("scp -p -P $sshport $src $mac:$tdir","$cmt delivery in $tdir on $mac");
-    pb_system("ssh -q $mac \"cd $tdir ; if [-f pbscript]; then chmod 755 ./pbscript ; ./pbscript\"","Executing pbscript on $mac");
+    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");
+    pb_system("ssh -q -p $port $mac \"cd $tdir ; if [ -f pbscript ]; then chmod 755 ./pbscript ; ./pbscript\"","Executing pbscript on $mac");
     if ($cmt eq "VMs") {
-        pb_system("scp -p -P $sshport $mac:$tdir/.... ...","Package recovery in $tdir from $mac");
+        pb_system("scp -p -P $port $mac:$tdir/.... ...","Package recovery in $tdir from $mac");
     }
 }