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');