keyboard/altgr: proper function to convert char maps

[sheet.git] / keyboard / altgr / ukext.eng.inc.pl

diff --git a/keyboard/altgr/ukext.eng.inc.pl b/keyboard/altgr/ukext.eng.inc.pl
index affecaf288b4403474af6cefa0e7ae7135a4f9fa..bfc995e9cc6ae09f212549fe5fb53d0a97c64b82 100644 (file)
--- a/keyboard/altgr/ukext.eng.inc.pl
+++ b/keyboard/altgr/ukext.eng.inc.pl
@@ -1,7 +1,9 @@
 use utf8;
 use strict;
 use warnings;
-our %rows = (
+do './keyboard/altgr/groups.inc.pl';
+
+my %rows = (
        '~' => '¦',
        '!' => '¡',
        '1' => '¹',
@@ -100,7 +102,7 @@ $rows{'['} = $rows{'2'};
 $rows{']'} = $rows{'#'};
 
 +{
-       %{ do 'keyboard/altgr/groups.inc.pl' },
+       %{ kbchars(\%rows) },
        title => 'UK-extended',
        version => '1.0',
        intro => join("\n",