From be2bb2b27d61a39bff6efd890c3d519c39db321e Mon Sep 17 00:00:00 2001 From: J Pipkin Date: Sat, 12 Jan 2013 04:14:03 -0600 Subject: implement failure-dependent exit statuses, ask to proceed if a failure is encountered during the process --- sbocheck | 13 +++++++++---- 1 file changed, 9 insertions(+), 4 deletions(-) (limited to 'sbocheck') diff --git a/sbocheck b/sbocheck index 5b36f57..2279717 100755 --- a/sbocheck +++ b/sbocheck @@ -85,10 +85,15 @@ sub print_output($) { # save a log of available updates my $logfile = '/var/log/sbocheck.log'; unlink $logfile if -f $logfile; - my $log_fh = open_fh($logfile, '>'); - say {$log_fh} $_ for @$listing; - close $log_fh; - say "A copy of the above result is kept in $logfile\n"; + my ($log_fh, $exit) = open_fh($logfile, '>'); + # non-fatal + if ($exit) { + warn $log_fh if $exit; + } else { + say {$log_fh} $_ for @$listing; + close $log_fh; + say "A copy of the above result is kept in $logfile\n"; + } } else { say "\nNo updates available."; } -- cgit v1.2.3