From 09fa58a5f166913442c8f3dcbb534be92fb5a4af Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 23 Feb 2007 12:34:58 +0000 Subject: perl_checker cleanups --- Rpmdrake/gui.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm index 4aef115a..e10c8d46 100644 --- a/Rpmdrake/gui.pm +++ b/Rpmdrake/gui.pm @@ -452,7 +452,7 @@ sub callback_choices { } my $callback = sub { interactive_msg(N("More information on package..."), get_info($_[0]), scroll => 1) }; $choices = [ sort { $a->name cmp $b->name } @$choices ]; - my @choices = interactive_list_(N("Please choose"), scalar(@$choices)==1 ? + my @choices = interactive_list_(N("Please choose"), scalar(@$choices) == 1 ? N("The following package is needed:") : N("One of the following packages is needed:"), [ map { urpm_name($_) } @$choices ], $callback); $choices->[$choices[0]]; @@ -570,11 +570,11 @@ sub toggle_nodes { } @cant; my $count = @reasons; interactive_msg( - $count==1 ? + $count == 1 ? N("One package cannot be installed") : N("Some packages can't be installed"), - $count==1 ? - N("Sorry, the following package cannot be selected:\n\n%s",join("\n", @reasons)) + $count == 1 ? + N("Sorry, the following package cannot be selected:\n\n%s", join("\n", @reasons)) : N("Sorry, the following packages can't be selected:\n\n%s", join("\n", @reasons)), scroll => 1, ); -- cgit v1.2.1