fix perl warnings

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@11455 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2012-02-02 12:36:23 +00:00
parent 8f9ae079d2
commit 53acd54581

View File

@ -618,7 +618,7 @@ sub sendnodeskeys
next;
}
my @result = $sendkeys->expect(
@result = $sendkeys->expect(
$timeout,
[
$prompt1, # Are you sure you want to ...
@ -704,7 +704,7 @@ sub sendnodeskeys
#run copy.sh prompts starts here
#
my @result = $sendkeys->expect(
@result = $sendkeys->expect(
$timeout,
[
$prompt1, # Are you sure you want to ...