xCAT/xcat-core
2
0
Fork 0
mirror of https://github.com/xcat2/xcat-core.git synced 2025-11-04 05:12:30 +00:00
Code Issues Releases Wiki Activity

fix MsgUtils SA option for xcatd -f interface

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5510 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav
2010-03-17 16:41:42 +00:00
parent ffd0139d4d
commit fef18ac04e
1 changed files with 10 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
perl-xCAT/xCAT/MsgUtils.pm
View File

@@ -278,7 +278,16 @@ sub message
# should be I, D, E, S, SA ,LS, W , L,N
# or S(I, D, E, S, W, L,N)
#
# if new SA option need to split syslog messages from auditlog entry
#
my $newrsp;
if ($sev eq 'SA')
{ # if SA then need to pull first entry from $rsp
# for syslog, to preserve old interface
$newrsp = $rsp;
$rsp = $newrsp->{syslogdata}->[0];
}
my $stdouterrf = \*STDOUT;
my $stdouterrd = '';
if ($sev =~ /[E]/)
@@ -442,13 +451,6 @@ sub message
}
# is syslog requested
my $newrsp;
if ($sev eq 'SA')
{ # if SA then need to pull first entry from $rsp
# for syslog, to preserve old interface
$newrsp = $rsp;
$rsp = $newrsp->{syslogdata}->[0];
}
if ($sev =~ /S/)
{