xCAT/xcat-core
2
0
Fork 0
mirror of https://github.com/xcat2/xcat-core.git synced 2025-06-13 18:00:38 +00:00
Code Issues Releases Wiki Activity

modified depending on comments

Browse Source
This commit is contained in:
XuWei
2017-12-08 02:54:49 -05:00
parent e1e108ea6d
commit 803d4134b6
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
xCAT-server/lib/xcat/plugins/openbmc.pm
View File

@ -1081,7 +1081,7 @@ sub parse_command_status {
$next_status{REVENTLOG_REQUEST} = "REVENTLOG_RESPONSE";
$status_info{REVENTLOG_RESPONSE}{argv} = "$subcommand";
my $policy_table = "/opt/ibm/ras/lib/policyTable.json";
my $policy_mapping = "/opt/xcat/lib/perl/xCAT/data/openbmcevents.pm";
my $policy_mapping = "$::XCATROOT/lib/perl/xCAT/data/openbmcevents.pm";
if (-e "$policy_table") {
my $policy_json = `cat $policy_table`;
if ($policy_json) {
@ -2176,6 +2176,7 @@ sub reventlog_response {
}
xCAT::SvrUtils::sendmsg("$::NO_ATTRIBUTES_RETURNED", $callback, $node) if (!%output);
# If option is "all", print out all sorted msg. If is a num, print out the last <num> msg (sorted)
foreach my $key ( sort { $a <=> $b } keys %output) {
xCAT::MsgUtils->message("I", { data => ["$node: $output{$key}"] }, $callback) if ($entry_string eq "all" or $key > ($max_entry - $entry_num));
}