From 23a566beefbc502e4e772eff27d43036c814187e Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 13 Jan 2004 18:04:43 +0000 Subject: - "Next->" => "Next" - "<-Previous" => "Previous" --- perl-install/ugtk2.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/ugtk2.pm') diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 7c96fc35e..7c1ec65b7 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -489,9 +489,9 @@ sub create_okcancel { if (defined $o_cancel || defined $o_ok) { $cancel = $o_cancel; } elsif (!$::Wizard_no_previous) { - $cancel = $::isWizard ? N("<- Previous") : N("Cancel"); + $cancel = $::isWizard ? N("Previous") : N("Cancel"); } - my $ok = defined $o_ok ? $o_ok : $::isWizard ? ($::Wizard_finished ? N("Finish") : N("Next ->")) : N("Ok"); + my $ok = defined $o_ok ? $o_ok : $::isWizard ? ($::Wizard_finished ? N("Finish") : N("Next")) : N("Ok"); my $bok = $ok && gtksignal_connect($w->{ok} = Gtk2::Button->new($ok), clicked => $w->{ok_clicked} || sub { $w->{retval} = 1; Gtk2->main_quit }); my $bprev; if ($cancel) { -- cgit v1.2.1