summaryrefslogtreecommitdiffstats
path: root/perl-install/share/keymaps_generate
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/share/keymaps_generate')
-rwxr-xr-xperl-install/share/keymaps_generate18
1 files changed, 0 insertions, 18 deletions
diff --git a/perl-install/share/keymaps_generate b/perl-install/share/keymaps_generate
deleted file mode 100755
index 0265502c9..000000000
--- a/perl-install/share/keymaps_generate
+++ /dev/null
@@ -1,18 +0,0 @@
-#!/usr/bin/perl
-
-use lib "..";
-use keyboard;
-
-my $dir = "keymaps/usr/share/keymaps";
-system("rm -rf keymaps ; mkdir -p keymaps/usr/share/keymaps");
-
-foreach (keyboard::keyboards()) {
- my $kmap = keyboard::keyboard2kmap($_);
- if (system("./kmap2bkmap $kmap > $dir/$kmap.bkmap 2>/dev/null") != 0) {
- warn "unknown kmap $kmap\n";
- unlink "$dir/$kmap.bkmap";
- }
-}
-
-system("tar cfj keymaps.tar.bz2 -C keymaps usr") == 0 or die;
-system("rm -rf keymaps");