From f3f7890225efe689e3c16b12e7a0fc5eb87bb75b Mon Sep 17 00:00:00 2001 From: huweihua Date: Fri, 12 Oct 2018 01:20:18 -0400 Subject: [PATCH] Enhance osdeploy for issue 5488 --- xCAT-probe/lib/perl/LogParse.pm | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/xCAT-probe/lib/perl/LogParse.pm b/xCAT-probe/lib/perl/LogParse.pm index ec8cb98b7..eed2a80fd 100644 --- a/xCAT-probe/lib/perl/LogParse.pm +++ b/xCAT-probe/lib/perl/LogParse.pm @@ -126,10 +126,15 @@ sub obtain_log_file_list { my $self = shift; my %candidate_log; + my @loglist = ("/var/log/messages", + "/var/log/xcat/cluster.log", + "/var/log/xcat/computes.log", + "/var/log/syslog"); + my @candidate_log_set; - push @candidate_log_set, "/var/log/messages" if (-e "/var/log/messages"); - push @candidate_log_set, "/var/log/xcat/cluster.log" if (-e "/var/log/xcat/cluster.log"); - push @candidate_log_set, "/var/log/xcat/computes.log" if (-e "/var/log/xcat/computes.log"); + foreach my $log (@loglist){ + push @candidate_log_set, $log if (-e "$log"); + } my $filename; foreach my $log (@candidate_log_set) {