diff options
| -rw-r--r-- | perl-install/pkgs.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index 5c78fbbf6..90744fb30 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -729,7 +729,7 @@ sub setSelectedFromCompssList { my @packages = allPackages($packages); my @places = do { #- special case for /^k/ aka kde stuff - my @values = map { (unpack "s*", $_->[$VALUES])[$ind] } @packages; + my @values = map { my @v = unpack "s*", $_->[$VALUES]; $v[$ind] } @packages; sort { $values[$b] <=> $values[$a] } 0 .. $#packages; }; foreach (@places) { |