summaryrefslogtreecommitdiffstats
path: root/tools/keyboarddrake
diff options
context:
space:
mode:
Diffstat (limited to 'tools/keyboarddrake')
-rwxr-xr-xtools/keyboarddrake3
1 files changed, 3 insertions, 0 deletions
diff --git a/tools/keyboarddrake b/tools/keyboarddrake
index 5d79ea8..567a221 100755
--- a/tools/keyboarddrake
+++ b/tools/keyboarddrake
@@ -20,6 +20,9 @@ my $keyboard = keyboard::read_or_default();
if (my ($kb) = grep { !/^-/ } @ARGV) {
keyboard::KEYBOARD2text($kb) or die "bad keyboard $kb\n";
$keyboard->{KEYBOARD} = $kb;
+} elsif (grep { $_ eq '--migrate' } @ARGV) {
+ keyboard::write($keyboard);
+ exit 0;
} else {
$ugtk2::wm_icon = "/usr/share/mcc/themes/default/keyboard-mdk.png";
$in = 'interactive'->vnew('su');