-Fix perl syntax error in Client.pm called out with perl -Wc

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@1044 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2008-04-14 13:55:17 +00:00
parent 0815678284
commit 4ab4e9dcd1

View File

@ -141,7 +141,7 @@ sub submit_request {
die "Connection failure: $@"
}
}
my $msg=XMLout($request,RootName=>xcatrequest,NoAttr=>1,KeyAttr=>[]);
my $msg=XMLout($request,RootName=>'xcatrequest',NoAttr=>1,KeyAttr=>[]);
print $client $msg;
my $response;
my $rsp;