Unicode composite letters in cc variant is now full-width
This commit is contained in:
parent
f03d0fc6cd
commit
d1024b9c41
|
@ -748,8 +748,8 @@ export : define [apply] : begin
|
||||||
define [createLigatures shrink1 shrink2 wadj1 wadj2 records] : if [not recursive] : begin
|
define [createLigatures shrink1 shrink2 wadj1 wadj2 records] : if [not recursive] : begin
|
||||||
local pendingGlyphs1 : records.map : [record] => record.1
|
local pendingGlyphs1 : records.map : [record] => record.1
|
||||||
local pendingGlyphs2 : records.map : [record] => record.2
|
local pendingGlyphs2 : records.map : [record] => record.2
|
||||||
local df1 : Thinner pendingGlyphs1 shrink1
|
local df1 : Thinner pendingGlyphs1 [if (para.spacing == 3) 1 shrink1]
|
||||||
local df2 : Thinner pendingGlyphs2 shrink2
|
local df2 : Thinner pendingGlyphs2 [if (para.spacing == 3) 1 shrink2]
|
||||||
|
|
||||||
foreach [{unicode c1 c2 mark} : items-of records] : begin
|
foreach [{unicode c1 c2 mark} : items-of records] : begin
|
||||||
local glyphName "\(c1)_\(c2)"
|
local glyphName "\(c1)_\(c2)"
|
||||||
|
@ -757,7 +757,14 @@ export : define [apply] : begin
|
||||||
local j 2
|
local j 2
|
||||||
while glyphs.(glyphName + j) : inc j
|
while glyphs.(glyphName + j) : inc j
|
||||||
set glyphName (glyphName + j)
|
set glyphName (glyphName + j)
|
||||||
|
if (para.spacing == 3) : begin
|
||||||
|
sketch
|
||||||
|
include df2.(c2)
|
||||||
|
include : Translate WIDTH 0
|
||||||
|
include df1.(c1)
|
||||||
|
set-width FULLWIDTH
|
||||||
|
save glyphName unicode
|
||||||
|
: else
|
||||||
local kern : SB * 7/8 * (shrink1 + shrink2)
|
local kern : SB * 7/8 * (shrink1 + shrink2)
|
||||||
local refw : WIDTH * (shrink1 * wadj1 + shrink2 * wadj2) - kern
|
local refw : WIDTH * (shrink1 * wadj1 + shrink2 * wadj2) - kern
|
||||||
sketch
|
sketch
|
||||||
|
|
Loading…
Reference in New Issue
Block a user