summaryrefslogtreecommitdiffstats
path: root/perl-install/keyboard.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-09-04 21:49:40 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-09-04 21:49:40 +0000
commitbcd1bf4e45de7e5f59a6c1e7eaaf7ad401d7fc28 (patch)
tree01e2e993eee17983f2d616caecc998cc3dba5acf /perl-install/keyboard.pm
parentbeb56af292cfc8f5ed3e78034da33e96ca9e7953 (diff)
downloaddrakx-bcd1bf4e45de7e5f59a6c1e7eaaf7ad401d7fc28.tar
drakx-bcd1bf4e45de7e5f59a6c1e7eaaf7ad401d7fc28.tar.gz
drakx-bcd1bf4e45de7e5f59a6c1e7eaaf7ad401d7fc28.tar.bz2
drakx-bcd1bf4e45de7e5f59a6c1e7eaaf7ad401d7fc28.tar.xz
drakx-bcd1bf4e45de7e5f59a6c1e7eaaf7ad401d7fc28.zip
no_comment
Diffstat (limited to 'perl-install/keyboard.pm')
-rw-r--r--perl-install/keyboard.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/keyboard.pm b/perl-install/keyboard.pm
index bf49804df..3b53bf194 100644
--- a/perl-install/keyboard.pm
+++ b/perl-install/keyboard.pm
@@ -61,6 +61,7 @@ my %keyboards = (
);
sub list { map { $_->[0] } values %keyboards }
+sub xmodmaps { map { $_->[2] } values %keyboards }
sub keyboard2text { $keyboards{$_[0]} && $keyboards{$_[0]}[0] }
sub text2keyboard {
my ($t) = @_;