From a624390c70675cd26d6166a6f4402e87f0d3cbc4 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 15 Jan 2004 12:23:42 +0000 Subject: formatList is imported, no need to get it in common:: --- perl-install/install_steps_gtk.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 46eed32b9..63a10764b 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -384,7 +384,7 @@ sub choosePackagesTree { } } $error = [ N("You can't select/unselect this package"), - common::formatList(20, map { my $rb = $state->{rejected}{$_}{backtrack}; + formatList(20, map { my $rb = $state->{rejected}{$_}{backtrack}; my @froms = keys %{$rb->{closure} || {}}; my @unsatisfied = @{$rb->{unsatisfied} || []}; my $s = join ", ", ((map { N("due to missing %s", $_) } @froms), @@ -400,7 +400,7 @@ sub choosePackagesTree { $o->ask_okcancel('', [ $isSelection ? N("The following packages are going to be installed") : N("The following packages are going to be removed"), - common::formatList(20, sort @l) ], 1) or $error = ''; #- defined + formatList(20, sort @l) ], 1) or $error = ''; #- defined } $error and $o->ask_warn('', $error); if (defined $error) { -- cgit v1.2.1