From 27f9bd30a5dba6a4d2fd8b19156a13e499a11b84 Mon Sep 17 00:00:00 2001
From: sakolish <sakolish@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 5 Mar 2008 18:55:47 +0000
Subject: [PATCH] Increase lshwres timeout to 30 seconds - Line #550

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@687 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT-2.0/xCAT/PPCcli.pm | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/perl-xCAT-2.0/xCAT/PPCcli.pm b/perl-xCAT-2.0/xCAT/PPCcli.pm
index 998a30011..f2e4ee8f5 100644
--- a/perl-xCAT-2.0/xCAT/PPCcli.pm
+++ b/perl-xCAT-2.0/xCAT/PPCcli.pm
@@ -542,11 +542,12 @@ sub rmvterm {
 ##########################################################################
 sub lshwres {
 
-    my $exp   = shift;
-    my $d     = shift;
-    my $mtms  = shift;
-    my $cmd   = "lshwres -r @$d[1] -m $mtms -F @$d[2]";
-    my $level = @$d[0];
+    my $exp     = shift;
+    my $d       = shift;
+    my $mtms    = shift;
+    my $cmd     = "lshwres -r @$d[1] -m $mtms -F @$d[2]";
+    my $level   = @$d[0];
+    my $timeout = 30;
  
     #####################################
     # level may be "sys" or "lpar" 
@@ -557,7 +558,7 @@ sub lshwres {
     #####################################
     # Send command
     #####################################
-    my $result = send_cmd( $exp, $cmd );
+    my $result = send_cmd( $exp, $cmd, $timeout );
     return( $result );
 }