arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

defect 4082 - change previous fix to disable warnings when calling setlogsock to work with older versions of perl too

Browse Source
This commit is contained in:
mellor 2015-02-04 08:00:03 -05:00
parent 09a0e5fe1f
commit 874f77afed
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
xCAT-server/sbin/xcatd
View File

@ -113,9 +113,9 @@ use Sys::Syslog qw(:DEFAULT setlogsock);
openlog("xcatd",,"local4");
# turn off warnings for call to setlogsock. puts out warning message if
# syslog tcp port not defined in /etc/services. this can safely be ignored.
no warnings qw(Sys::Syslog);
no warnings;
setlogsock(["tcp","unix","stream"]);
use warnings qw(Sys::Syslog);
use warnings;
use xCAT::NotifHandler;
use xCAT_monitoring::monitorctrl;