Change to using logger for syslog instead of perl interface

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@2003 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2008-08-10 12:47:08 +00:00
parent f550996518
commit ef5f9c598b

View File

@ -280,9 +280,15 @@ sub message
# If they want this msg to also go to syslog, do that now
eval {
openlog("xCAT", '', 'local4');
syslog("err", $rsp);
closelog();
#openlog("xCAT", '', 'local4');
#syslog("err", $rsp);
#closelog();
# switched to logger due to hangs using Perl interface
# when syslog not running
`logger -p local4.err -t xcat $rsp`;
if ( $? != 0) {
print $stdouterrf "Error using Syslog/n";
}
};
}
}