git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
keyboard/altgr: image alt descriptions
[sheet.git]
/
keyboard
/
altgr
/
windows.eng.inc.pl
diff --git
a/keyboard/altgr/windows.eng.inc.pl
b/keyboard/altgr/windows.eng.inc.pl
index 4d51ff8b249391d432fc5518f53ed130290edfb3..fc2f5d7a25e572e3c5a7363656d2a27529ce1705 100644
(file)
--- a/
keyboard/altgr/windows.eng.inc.pl
+++ b/
keyboard/altgr/windows.eng.inc.pl
@@
-1,6
+1,7
@@
use utf8;
use strict;
use warnings;
use utf8;
use strict;
use warnings;
+use Shiar_Sheet::KeyboardChars 'kbchars';
my @az = ('A'..'Z', 'a'..'z');
my @letters = qw(
my @az = ('A'..'Z', 'a'..'z');
my @letters = qw(
@@
-21,7
+22,7
@@
my %xkb = (
'?' => "\N{COMBINING HOOK ABOVE}",
);
'?' => "\N{COMBINING HOOK ABOVE}",
);
-
our
%rows = (
+
my
%rows = (
'~' => "\N{COMBINING TILDE}",
'`' => "\N{COMBINING GRAVE ACCENT}",
'!' => '¹',
'~' => "\N{COMBINING TILDE}",
'`' => "\N{COMBINING GRAVE ACCENT}",
'!' => '¹',
@@
-60,7
+61,7
@@
our %rows = (
} 0 .. $#az
);
} 0 .. $#az
);
-my $groups =
do 'keyboard/altgr/groups.inc.pl'
;
+my $groups =
kbchars(\%rows)
;
$groups->{def}{''}{$_} .= ' ext' for keys %xkb;
$groups->{flag}{ext} = ['xkb', 'unofficial extensions added in Linux (Gnome, KDE)'];
$groups->{def}{''}{$_} .= ' ext' for keys %xkb;
$groups->{flag}{ext} = ['xkb', 'unofficial extensions added in Linux (Gnome, KDE)'];
@@
-78,5
+79,6
@@
$groups->{flag}{ext} = ['xkb', 'unofficial extensions added in Linux (Gnome, KDE
"Windows US international keyboard layout table",
"with the AltGr modifier key.",
],
"Windows US international keyboard layout table",
"with the AltGr modifier key.",
],
- image => 'keyboard/altgr/ku2971b-usint.jpg',
+ image => 'data/keyboard/thumb/ku2971b-usint.jpg',
+ imagealt => 'AltGr on a KeyboardCompany KU2971B with USA International keycaps',
}
}