keyboard: recombine translations in include syntax

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

diff --git a/keyboard/altgr/zoo.eng.inc.pl b/keyboard/altgr/zoo.eng.inc.pl
index a3ff9c1d89dc5b05f3d50708451434abbe0226ca..be03e0a41fcde869f59669d00fce70021a389d3a 100644 (file)
--- a/keyboard/altgr/zoo.eng.inc.pl
+++ b/keyboard/altgr/zoo.eng.inc.pl
@@ -130,7 +130,7 @@ my $groups = kbchars(\%rows);
 
 while (my ($k, $c) = each %rows) {
        $c =~ s/\n.*//;
-       $groups->{def}{''}{$k} = (
+       $groups->{def}{''}{$k}[0] = (
                $c =~ /\p{In=1.1}/ ? 'g2' :
                $c =~ /\p{In=6.0}/ ? 'g3' :
                $c =~ /\p{In=8.0}/ ? 'g4' :