diff options
| -rwxr-xr-x | perl-install/standalone/keyboarddrake | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/keyboarddrake b/perl-install/standalone/keyboarddrake index 9b1356056..f27a9e0a0 100755 --- a/perl-install/standalone/keyboarddrake +++ b/perl-install/standalone/keyboarddrake @@ -11,13 +11,13 @@ use common; use any; use c; -$ugtk2::wm_icon = "/usr/share/mcc/themes/default/keyboard-mdk.png"; my $in; my $keyboard = keyboard::read(); if (my ($kb) = grep { !/^-/ } @ARGV) { keyboard::KEYBOARD2text($kb) or die "bad keyboard $kb\n"; $keyboard->{KEYBOARD} = $kb; } else { + $ugtk2::wm_icon = "/usr/share/mcc/themes/default/keyboard-mdk.png"; $in = 'interactive'->vnew('su'); my ($xkb_models, $model2text) = keyboard::xkb_models(); |