From d6a55aa3ddc687a8276adb368b18efcdf6e610d8 Mon Sep 17 00:00:00 2001
From: mellor <mellor@us.ibm.com>
Date: Wed, 11 Jun 2014 13:20:42 -0400
Subject: [PATCH] defect 4082 - disable warnings when calling setlogsock

---
 xCAT-server/sbin/xcatd | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/xCAT-server/sbin/xcatd b/xCAT-server/sbin/xcatd
index 3c881770f..be95c4e6a 100755
--- a/xCAT-server/sbin/xcatd
+++ b/xCAT-server/sbin/xcatd
@@ -109,7 +109,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;