diff options
| author | Andreas Guldstrand <andreas.guldstrand@gmail.com> | 2016-05-04 00:15:59 +0200 |
|---|---|---|
| committer | Andreas Guldstrand <andreas.guldstrand@gmail.com> | 2016-05-04 00:15:59 +0200 |
| commit | d6de6295df667e55e75b6b5b9c7ef372df9735fd (patch) | |
| tree | dd0f44813c8e790d05e1f5bceb44fa9ebaf1c9dc | |
| parent | 48762d6c2de053946e203903cf3c5a39543f4b4f (diff) | |
| download | sbotools2-d6de6295df667e55e75b6b5b9c7ef372df9735fd.tar.xz | |
SBO::Lib: get_sbo_version coerced false values to undef uselessly
| -rw-r--r-- | SBO-Lib/lib/SBO/Lib.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/SBO-Lib/lib/SBO/Lib.pm b/SBO-Lib/lib/SBO/Lib.pm index d7801cb..412d128 100644 --- a/SBO-Lib/lib/SBO/Lib.pm +++ b/SBO-Lib/lib/SBO/Lib.pm @@ -610,7 +610,7 @@ sub get_from_info { sub get_sbo_version { script_error('get_sbo_version requires an argument.') unless @_ == 1; my $version = get_from_info(LOCATION => shift, GET => 'VERSION'); - return $$version[0] ? $$version[0] : undef; + return $version->[0]; } # for each installed sbo, find out whether or not the version in the tree is |