summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/keyboarddrake
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-03-22 15:46:50 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-03-22 15:46:50 +0000
commit12b898220c2230db5c61e059d2fe8a36a021f6b7 (patch)
treecfc66e196ea33194ac9b60b0b62ff8d4dfa9e761 /perl-install/standalone/keyboarddrake
parent6c49b184ecbe855a6eb6437ed4cff4e76cb4d01e (diff)
downloaddrakx-12b898220c2230db5c61e059d2fe8a36a021f6b7.tar
drakx-12b898220c2230db5c61e059d2fe8a36a021f6b7.tar.gz
drakx-12b898220c2230db5c61e059d2fe8a36a021f6b7.tar.bz2
drakx-12b898220c2230db5c61e059d2fe8a36a021f6b7.tar.xz
drakx-12b898220c2230db5c61e059d2fe8a36a021f6b7.zip
clean-up
Diffstat (limited to 'perl-install/standalone/keyboarddrake')
-rwxr-xr-xperl-install/standalone/keyboarddrake2
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();