summaryrefslogtreecommitdiff
path: root/language/japanese/jlreq/make_variant_jfm.lua
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2020-12-30 03:01:29 +0000
committerNorbert Preining <norbert@preining.info>2020-12-30 03:01:29 +0000
commite08b2c1f89e1eb5123b62d01b4932f5dad1a4305 (patch)
treea1fd98fa73bd422e72744a9f6e65c1e67a7078e1 /language/japanese/jlreq/make_variant_jfm.lua
parentec483f80cce5e50f1ea09f9cdea99d26fbba5c5d (diff)
CTAN sync 202012300301
Diffstat (limited to 'language/japanese/jlreq/make_variant_jfm.lua')
-rw-r--r--language/japanese/jlreq/make_variant_jfm.lua33
1 files changed, 33 insertions, 0 deletions
diff --git a/language/japanese/jlreq/make_variant_jfm.lua b/language/japanese/jlreq/make_variant_jfm.lua
index e91e85cc33..a38ddd1391 100644
--- a/language/japanese/jlreq/make_variant_jfm.lua
+++ b/language/japanese/jlreq/make_variant_jfm.lua
@@ -97,6 +97,7 @@ function tolf(file)
end
local originaljfm = "jlreq"
+local originaljfm_jidori = "jlreq-jidori"
local jfmfile = kpse.find_file("jfm-" .. originaljfm .. ".lua")
if jfmfile == nil then
@@ -175,3 +176,35 @@ fp:close()
tolf(file);
+
+jfmfile = kpse.find_file("jfm-" .. originaljfm_jidori .. ".lua")
+if jfmfile == nil then
+ print("JFM " .. originaljfm_jidori .. " is not found")
+ os.exit(1)
+end
+
+jfm = nil
+function luatexja.jfont.define_jfm(j)
+ jfm = j
+end
+dofile(jfmfile)
+
+function to_jidori_pl(t)
+ t = table.fastcopy(t)
+ -- kanjiskipに任せているところを15zwに変更
+ for cl1,val in pairs(t) do
+ if type(cl1) == "number" then
+ for cl2,glue in pairs(val.glue) do
+ if glue.kanjiskip_stretch == 1 then
+ t[cl1].glue[cl2][2] = 15
+ end
+ end
+ end
+ end
+ return t
+end
+
+
+make_jfmfile(to_jidori_pl(jfm),"jfm-jlreq-jidori-pl.lua")
+make_jfmfile(to_jidori_pl(tate(jfm)),"jfm-jlreqv-jidori-pl.lua")
+make_jfmfile(tate(jfm),"jfm-jlreqv-jidori.lua")