summaryrefslogtreecommitdiff
path: root/tex/context/base/font-agl.lua
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/font-agl.lua')
-rw-r--r--tex/context/base/font-agl.lua11
1 files changed, 7 insertions, 4 deletions
diff --git a/tex/context/base/font-agl.lua b/tex/context/base/font-agl.lua
index 3eac792d7..729863618 100644
--- a/tex/context/base/font-agl.lua
+++ b/tex/context/base/font-agl.lua
@@ -6,10 +6,13 @@ if not modules then modules = { } end modules ['font-map'] = {
comment = "Adobe Glyph List, version 2.0, September 20, 2002",
}
-local fonts = fonts
-fonts.map = fonts.map or { }
+local allocate = utilities.storage.allocate
-fonts.map.unicode_to_agl = {
+local enc = fonts.enc
+local agl = { }
+enc.agl = agl
+
+agl.names = allocate { -- to name
"controlSTX",
"controlSOT",
"controlETX",
@@ -3692,4 +3695,4 @@ fonts.map.unicode_to_agl = {
[0xFFE6] = "wonmonospace",
}
-fonts.map.agl_to_unicode = table.swapped(fonts.map.unicode_to_agl)
+agl.unicodes = allocate(table.swapped(agl.names)) -- to unicode