-Provide more verbose feedback on dispatch failures.

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@1998 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2008-08-08 17:06:08 +00:00
parent e475b22be6
commit 3a93ec2669

View File

@ -914,8 +914,9 @@ sub dispatch_request {
xCAT::Client::submit_request($_,\&dispatch_callback,$xcatdir."/cert/server-cred.pem",$xcatdir."/cert/server-cred.pem",$xcatdir."/cert/ca.pem");
};
if ($@) {
dispatch_callback({error=>["Unable to dispatch command to ".$ENV{XCATHOST}.", command will not make changes to that server"],errorcode=>[1]});
syslog("local4|err","Error dispatching request: ".$@);
my $errstr=$@;
dispatch_callback({error=>["Unable to dispatch command to ".$ENV{XCATHOST}.", command will not make changes to that server ($errstr)"],errorcode=>[1]});
syslog("local4|err","Error dispatching request: ".$errstr);
}
} else {
$$progname.=": locally executing";