From b6ab813177bf359fc0d84c9baa11dcbca769c20f Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Mon, 8 Apr 2002 16:25:07 +0000 Subject: fix a few english strings --- perl-install/interactive_stdio.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/interactive_stdio.pm') diff --git a/perl-install/interactive_stdio.pm b/perl-install/interactive_stdio.pm index ef77e8884..519f5ccbe 100644 --- a/perl-install/interactive_stdio.pm +++ b/perl-install/interactive_stdio.pm @@ -91,7 +91,7 @@ ask_fromW_begin: $i and ${$e->{val}} = ${$e->{list}}[$i-1], $common->{callbacks}{changed}->($ind); } elsif ($e->{type} eq 'button') { print _("Button `%s': %s", $e->{label}, may_apply($e->{format}, ${$e->{val}})), " $e->{text}\n"; - print _("Do you want to click on this button? "); + print _("Do you want to click on this button?"); my $i = readln(); ($i && $i !~ /^n/i) and $e->{clicked_may_quit}(), $common->{callbacks}{changed}->($ind); } elsif ($e->{type} eq 'label') { @@ -100,7 +100,7 @@ ask_fromW_begin: print $t; } elsif ($e->{type} eq 'entry') { print "$e->{label} $e->{text}\n"; - print _("Your choice? (default `%s'%s) ", ${$e->{val}}, ${$e->{val}} ne '' ? " enter `void' for void entry" : ''); + print _("Your choice? (default `%s'%s) ", ${$e->{val}}, ${$e->{val}} ne '' ? _(" enter `void' for void entry") : ''); my $i = readln(); ${$e->{val}} = $i || ${$e->{val}}; ${$e->{val}} = '' if ${$e->{val}} eq 'void'; -- cgit v1.2.1