diff options
Diffstat (limited to 'SBO-Lib/lib/SBO/Lib.pm')
| -rw-r--r-- | SBO-Lib/lib/SBO/Lib.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/SBO-Lib/lib/SBO/Lib.pm b/SBO-Lib/lib/SBO/Lib.pm index c4ab1b2..27e6eb7 100644 --- a/SBO-Lib/lib/SBO/Lib.pm +++ b/SBO-Lib/lib/SBO/Lib.pm @@ -111,9 +111,9 @@ sub get_slack_version { my $fh = open_read ('/etc/slackware-version'); chomp (my $line = <$fh>); close $fh; - my $version = ($line =~ /\s+(\d+[^\s]+)$/)[0]; + my $version = ($line =~ /\s+(\d+[^\s]+)$/)[0] + 0; die "Unsupported Slackware version: $version\n" - unless $version + 0 ~~ %supported; + unless $version ~~ %supported; return $supported{$version}; } |