diff options
| author | J Pipkin <j@dawnrazor.net> | 2013-01-10 23:19:05 -0600 |
|---|---|---|
| committer | J Pipkin <j@dawnrazor.net> | 2013-01-10 23:19:05 -0600 |
| commit | 8faf46df2a114cce9ad3537b86b6a68b04e91ce5 (patch) | |
| tree | b3c6ca8203e68e1f0edfc538367cad6310d7ab7b | |
| parent | 76df5fd14186ca2492274f348f8f0be8d5e7bad6 (diff) | |
| download | sbotools2-8faf46df2a114cce9ad3537b86b6a68b04e91ce5.tar.xz | |
fix to print_failures() fix, and a modification for conciseness
| -rw-r--r-- | SBO-Lib/lib/SBO/Lib.pm | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/SBO-Lib/lib/SBO/Lib.pm b/SBO-Lib/lib/SBO/Lib.pm index c249793..c138846 100644 --- a/SBO-Lib/lib/SBO/Lib.pm +++ b/SBO-Lib/lib/SBO/Lib.pm @@ -1027,11 +1027,7 @@ sub process_sbos { ); }; # if $@ is defined, $temp_syms will be empty and the script will error # instead of having a proper failure message. - if ($@) { - $failures{$sbo} = $@; - } else { - push @symlinks, @$temp_syms; - } + $@ ? $failures{$sbo} = $@ : push @symlinks, @$temp_syms; } # return now if we were unable to download/verify everything - might want # to not do this. not sure. @@ -1096,7 +1092,6 @@ sub process_sbos { sub print_failures { my $failures = shift; if (keys %$failures > 0) { - my $failures = shift; say 'Failures:'; say " $_: $$failures{$_}" for keys %$failures; } |