diff options
Diffstat (limited to 'perl-install/pkgs.pm')
| -rw-r--r-- | perl-install/pkgs.pm | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index fe8445792..0f45ec00d 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -2,7 +2,6 @@ package pkgs; # $Id$ use diagnostics; use strict; -use vars qw(%preferred $limitMinTrans %compssListDesc); use MDK::Common::System; use URPM; @@ -17,12 +16,10 @@ use loopback; use c; - -my @preferred = qw(perl-GTK postfix gcc gcc-cpp gcc-c++ proftpd ghostscript-X vim-minimal kernel db1 db2 ispell-en Bastille-Curses-module nautilus libxpm4 zlib1 libncurses5 harddrake cups); -@preferred{@preferred} = (); +our %preferred = map { $_ => undef } qw(perl-GTK postfix gcc gcc-cpp gcc-c++ proftpd ghostscript-X vim-minimal kernel db1 db2 ispell-en Bastille-Curses-module nautilus libxpm4 zlib1 libncurses5 harddrake cups); #- lower bound on the left ( aka 90 means [90-100[ ) -%compssListDesc = ( +our %compssListDesc = ( 5 => N_("must have"), 4 => N_("important"), 3 => N_("very nice"), @@ -31,7 +28,7 @@ my @preferred = qw(perl-GTK postfix gcc gcc-cpp gcc-c++ proftpd ghostscript-X vi ); #- constant for small transaction. -$limitMinTrans = 8; +our $limitMinTrans = 8; #- package to ignore, typically in Application CD. OBSOLETED ? |