From d70dffb82b66da4163cc07e8bde185e2e700dcf1 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Aur=C3=A9lien=20Lefebvre?= Date: Thu, 20 Aug 2009 09:35:21 +0000 Subject: - drakboot o fix crash bug #52997 --- perl-install/NEWS | 2 ++ perl-install/install/NEWS | 2 ++ perl-install/interactive/gtk.pm | 2 +- 3 files changed, 5 insertions(+), 1 deletion(-) diff --git a/perl-install/NEWS b/perl-install/NEWS index 817d5c862..0e0b75c74 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,5 +1,7 @@ - adduserdrake o added weakness check for root password +- drakboot + o fix crash bug #52997 Version 12.45 - 18 August 2009 diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 29918abe8..ac5e20160 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,5 +1,7 @@ - adduserdrake o added weakness check for root password +- drakboot + o fix crash bug #52997 Version 12.45 - 18 August 2009 diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm index d34a14b14..a958fe7bc 100644 --- a/perl-install/interactive/gtk.pm +++ b/perl-install/interactive/gtk.pm @@ -453,7 +453,7 @@ sub create_widget { my @buttons = ( N_("Add"), N_("Modify"), N_("Remove")); # Add Up/Down buttons if their actions are defined foreach (qw(Up Down)) { - push @buttons, translate($_) if ($actions->{$_}); + push @buttons, $_ if ($actions->{$_}); } my @buttons = map { { kind => lc $_, action => $actions->{$_}, button => Gtk2::Button->new(translate($_)) }; -- cgit v1.2.1