diff options
Diffstat (limited to 'installer/slxos-setup')
-rwxr-xr-x | installer/slxos-setup | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/installer/slxos-setup b/installer/slxos-setup index 381de5b3..1ba15527 100755 --- a/installer/slxos-setup +++ b/installer/slxos-setup @@ -11,6 +11,7 @@ # General information about OpenSLX can be found at http://openslx.org/ # ----------------------------------------------------------------------------- use strict; +use warnings; my $abstract = q[ slxos-setup @@ -155,8 +156,9 @@ if ($action =~ m[^import]i) { } elsif ($action =~ m[^list-in]i) { print _tr("List of installed vendor-OSes:\n"); print join('', map { - s[^.+/][]; - "\t$_\n"; + my $vendorOS = $_; + $vendorOS =~ s[^.+/][]; + "\t$vendorOS\n"; } sort <$openslxConfig{'private-path'}/stage1/*>); } else { |