diff options
author | Francois Pons <fpons@mandriva.com> | 2000-01-09 15:08:48 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2000-01-09 15:08:48 +0000 |
commit | 0d13cea6c27e472490a6c5f8dc47a7f0e6122b84 (patch) | |
tree | 059d43e19642b129514eba033decdc68625b453a /perl-install/pkgs.pm | |
parent | bcdadca806b3b301a69d1ff6f69b52fe156b1bb4 (diff) | |
download | drakx-0d13cea6c27e472490a6c5f8dc47a7f0e6122b84.tar drakx-0d13cea6c27e472490a6c5f8dc47a7f0e6122b84.tar.gz drakx-0d13cea6c27e472490a6c5f8dc47a7f0e6122b84.tar.bz2 drakx-0d13cea6c27e472490a6c5f8dc47a7f0e6122b84.tar.xz drakx-0d13cea6c27e472490a6c5f8dc47a7f0e6122b84.zip |
*** empty log message ***
Diffstat (limited to 'perl-install/pkgs.pm')
-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 f4dff1d3e..91d81921c 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -225,7 +225,7 @@ sub readCompss($) { if (/^(\S+)/) { my $p = $compss; my @l = split ':', $1; - pop @l if $l[-1] =~ /^(x11|console)$/; +#- Why? pop @l if $l[-1] =~ /^(x11|console)$/; foreach (@l) { $p->{childs}{$_} ||= { childs => {} }; $p = $p->{childs}{$_}; |