summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-09-14 03:11:59 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-09-14 03:11:59 +0000
commite2b89187c23d32a83021a2e17ec0b02f71ce07ae (patch)
tree8ecc6485a58582dd446b60ee7aecb1e0f5802dce /perl-install/standalone
parent1e2d80af3fcf6a7deab711903d58f9380f2c1cf4 (diff)
downloaddrakx-e2b89187c23d32a83021a2e17ec0b02f71ce07ae.tar
drakx-e2b89187c23d32a83021a2e17ec0b02f71ce07ae.tar.gz
drakx-e2b89187c23d32a83021a2e17ec0b02f71ce07ae.tar.bz2
drakx-e2b89187c23d32a83021a2e17ec0b02f71ce07ae.tar.xz
drakx-e2b89187c23d32a83021a2e17ec0b02f71ce07ae.zip
sanitize capitale usage on buttons
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/drakTermServ4
-rwxr-xr-xperl-install/standalone/drakbackup3
-rwxr-xr-xperl-install/standalone/drakfont2
3 files changed, 4 insertions, 5 deletions
diff --git a/perl-install/standalone/drakTermServ b/perl-install/standalone/drakTermServ
index cc696b0fd..b5dce9d55 100755
--- a/perl-install/standalone/drakTermServ
+++ b/perl-install/standalone/drakTermServ
@@ -198,7 +198,7 @@ sub display_error {
$error_box = gtkpack_(Gtk2::VBox->new(0,0),
1, Gtk2::Label->new($message),
0, gtkadd(gtkset_layout(Gtk2::HButtonBox->new, 'spread'),
- gtksignal_connect(Gtk2::Button->new(N("OK")), clicked => sub {
+ gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => sub {
destroy_widget();
}),
),
@@ -471,7 +471,7 @@ sub text_view {
),
),
0, gtkpack(gtkset_layout(Gtk2::HButtonBox->new, 'spread'),
- gtksignal_connect(my $ok_button = Gtk2::Button->new(N("OK")), clicked => sub {
+ gtksignal_connect(my $ok_button = Gtk2::Button->new(N("Ok")), clicked => sub {
destroy_widget() if $option eq "close";
do_wizard() if $option eq "wizard";
}),
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup
index 1c92f310d..9edfe6c13 100755
--- a/perl-install/standalone/drakbackup
+++ b/perl-install/standalone/drakbackup
@@ -2516,8 +2516,7 @@ sub system_state() {
}
#- tape and CDRW share some features
- my $erase_media = N("NO");
- $erase_media = N("YES") if $conf{MEDIA_ERASE} && ($conf{USE_CD} || $conf{USE_TAPE});
+ my $erase_media = $conf{MEDIA_ERASE} && ($conf{USE_CD} || $conf{USE_TAPE}) ? N("Yes") : N("No");
$conf{USE_CD} and $system_state .= N("\n- Burn to CD");
$conf{USE_CD} and $conf{CDRW} and $system_state .= N("RW");
$conf{USE_CD} and $system_state .= N(" on device: %s", $conf{CD_DEVICE});
diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index 828a969ac..1bf891793 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -574,7 +574,7 @@ sub appli_choice() {
),
],
[
- gtksignal_connect(Gtk2::Button->new(N("OK")),
+ gtksignal_connect(Gtk2::Button->new(N("Ok")),
clicked => \&exitdialog,
),
],