From 0ed6dfac60ef151d51397173f485133e9b898c09 Mon Sep 17 00:00:00 2001
From: sakolish <sakolish@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 21 May 2008 15:21:34 +0000
Subject: [PATCH] lpar_netboot() - increased timeout to 10 times default value
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@1462 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
perl-xCAT-2.0/xCAT/PPCcli.pm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/perl-xCAT-2.0/xCAT/PPCcli.pm b/perl-xCAT-2.0/xCAT/PPCcli.pm
index 33c7b3a19..ce9d02d5d 100644
--- a/perl-xCAT-2.0/xCAT/PPCcli.pm
+++ b/perl-xCAT-2.0/xCAT/PPCcli.pm
@@ -166,7 +166,7 @@ sub connect {
} ],
[ $pwd_prompt,
sub {
- if ( ++$pwd_sent == 1 ) {
+ if ( ++$pwd_sent ) {
$ssh->send( "@$cred[1]\r" );
$ssh->exp_continue();
}
@@ -576,7 +576,7 @@ sub lpar_netboot {
my $name = shift;
my $d = shift;
my $opt = shift;
- my $timeout = 600;
+ my $timeout = my $t = @$exp[7]*10;
my $cmd = "lpar_netboot -t ent -f";
my $gateway = $opt->{G};