unicode: silence perl warning about empty query range offsets

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

diff --git a/keyboard/altgr/unigraph.eng.inc.pl b/keyboard/altgr/unigraph.eng.inc.pl
index 7c4d5709d9a1d170d739090f764a63a666f0e0b7..fbcf88c68663ad47b18670699b7478b9265a38ca 100644 (file)
--- a/keyboard/altgr/unigraph.eng.inc.pl
+++ b/keyboard/altgr/unigraph.eng.inc.pl
@@ -32,7 +32,7 @@ my %rows = qw`
        +f ╞ +F ╟ +g ╪ +G ╫ +h ╡ +H ╢
        +v ╘ +V ╙ +b ╧ +B ╨ +n ╛ +N ╜
 
        +f ╞ +F ╟ +g ╪ +G ╫ +h ╡ +H ╢
        +v ╘ +V ╙ +b ╧ +B ╨ +n ╛ +N ╜
 

-       ' ▬ " ▮
+       ' ▬ " ▮ +' ▪

        > ▛ . ▘ , ▀ M ▜ m ▝
        l ▌ ( ▚ k █ & ▞ j ▐  ; ▎ : ▊  +; 🮇 +: 🮊
        O ▙ o ▖ i ▄ U ▟ u ▗  / ▂ ? ▆  +/ 🮂 +? 🮅
        > ▛ . ▘ , ▀ M ▜ m ▝
        l ▌ ( ▚ k █ & ▞ j ▐  ; ▎ : ▊  +; 🮇 +: 🮊
        O ▙ o ▖ i ▄ U ▟ u ▗  / ▂ ? ▆  +/ 🮂 +? 🮅


@@ -66,11 +66,12 @@ while (my ($k, $c) = each %rows) {
                'g0'
        );
 }
                'g0'
        );
 }

-$groups->{def}{''}{')'}[0] .= ' linkkeyboard/altgr/zoo';
+$groups->{def}{''}{'+0'}[0] .= ' linkkeyboard/altgr/zoo';
+$groups->{def}{''}{ '0'}[0] .= ' linkkeyboard/altgr/im';

 
 +{
        %{ $groups },
 
 +{
        %{ $groups },

-       version => '1.2',
+       version => '1.3',

        title => 'Unicode semigraphics',
        category => 'specialized/graph',
        intro => join("\n",
        title => 'Unicode semigraphics',
        category => 'specialized/graph',
        intro => join("\n",