defect 4082 - disable warnings when calling setlogsock

This commit is contained in:
mellor 2014-06-11 13:20:42 -04:00
parent 7e4fa98e00
commit 3795edd2a8

View File

@ -104,7 +104,12 @@ use Data::Dumper;
use Getopt::Long;
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);
setlogsock(["tcp","unix","stream"]);
use warnings qw(Sys::Syslog);
use xCAT::NotifHandler;
use xCAT_monitoring::monitorctrl;