Changeset 776 in ProjectBuilder
- Timestamp:
- May 5, 2009, 3:35:05 AM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
devel/pb/bin/pb
r773 r776 1328 1328 $cpcmd = "scp -i $keyfile -p -o UserKnownHostsFile=/dev/null -P $nport"; 1329 1329 $cptarget = "$mac:$tdir"; 1330 if ($cmt =~ /^VM /) {1330 if ($cmt =~ /^VMbuild/) { 1331 1331 $cp2target = "$mac:$bdir"; 1332 1332 } … … 1423 1423 if ((($vmtype->{$ENV{'PBPROJ'}}) eq "kvm") || (($vmtype->{$ENV{'PBPROJ'}}) eq "qemu")) { 1424 1424 use Net::Telnet; 1425 my $t = new Net::Telnet (Timeout => 1 0, Host => "localhost", Port => $vmmonport->{$ENV{'PBPROJ'}}) || die "Unable to dialog on the monitor";1425 my $t = new Net::Telnet (Timeout => 120, Host => "localhost", Port => $vmmonport->{$ENV{'PBPROJ'}}) || die "Unable to dialog on the monitor"; 1426 1426 # move to monitor mode 1427 1427 my @lines = $t->cmd("c"); … … 2333 2333 print SCRIPT << 'EOF'; 2334 2334 #!/bin/bash 2335 2336 EOF 2337 if ($vtype eq "vm") { 2338 print SCRIPT "sleep 120\n"; 2339 } else { 2340 print SCRIPT "sleep 1\n"; 2341 } 2342 2335 sleep 2 2336 EOF 2343 2337 close(SCRIPT); 2344 2338 chmod 0755,"$pbscript";
Note:
See TracChangeset
for help on using the changeset viewer.