From a19b640ba4ebd769e4ef3649a1f3dc7bbd095383 Mon Sep 17 00:00:00 2001 From: phamt Date: Tue, 26 Feb 2013 03:01:08 +0000 Subject: [PATCH] Added syslog comments. git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@15259 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT/xCAT/zvmUtils.pm | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) diff --git a/perl-xCAT/xCAT/zvmUtils.pm b/perl-xCAT/xCAT/zvmUtils.pm index cb337f473..e31408e9b 100644 --- a/perl-xCAT/xCAT/zvmUtils.pm +++ b/perl-xCAT/xCAT/zvmUtils.pm @@ -294,6 +294,29 @@ sub printLn { #------------------------------------------------------- +=head3 printSyslog + + Description : Print a string to syslog + Arguments : String + Returns : Nothing + Example : xCAT::zvmUtils->printSyslog($str); + +=cut + +#------------------------------------------------------- +sub printSyslog { + + # Get inputs + my ( $class, $str ) = @_; + + # Print string + xCAT::MsgUtils->message( "S", $str ); + + return; +} + +#------------------------------------------------------- + =head3 isZvmNode Description : Determines if a given node is in the 'zvm' table