From 244684f5c8cc958244216a5282b16e1a2e3da0af Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sat, 24 Mar 2001 14:50:17 +0000
Subject: cleanup

---
 perl-install/pkgs.pm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'perl-install/pkgs.pm')

diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 6b4b840a3..3a3bea5bf 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -10,7 +10,6 @@ use commands;
 use run_program;
 use detect_devices;
 use log;
-use pkgs;
 use fs;
 use loopback;
 use c;
@@ -715,12 +714,12 @@ sub setSelectedFromCompssList {
 sub saveSelected {
     my ($packages) = @_;
     my @l = values %{$packages->{names}};
-    my @flags = map { pkgs::packageFlagSelected($_) } @l;
+    my @flags = map { packageFlagSelected($_) } @l;
     [ $packages, \@l, \@flags ];
 }
 sub restoreSelected {
     my ($packages, $l, $flags) = @{$_[0]};
-    mapn { pkgs::packageSetFlagSelected(@_) } $l, $flags;
+    mapn { packageSetFlagSelected(@_) } $l, $flags;
 }
 
 sub computeGroupSize {
-- 
cgit v1.2.1