diff --git a/buildglyphs.ptl b/buildglyphs.ptl index bf932d6..1fa0623 100644 --- a/buildglyphs.ptl +++ b/buildglyphs.ptl @@ -139,6 +139,7 @@ define [includeGlyphPart cg gs nm] : begin return : cg.include.apply cg [{gs.(nm)}.concat [{}.slice.call arguments 3]] ###### Canvas-based mechanism +define [$donothing$] nothing define-macro sketch : syntax-rules `[sketch @::steps] : begin if [not externEnv.$nWFGlyphs$] : set externEnv.$nWFGlyphs$ 0 @@ -149,7 +150,7 @@ define-macro sketch : syntax-rules begin @::[steps.map formOf] set dependencyProfile.(currentGlyph.name) : getDependencyProfile currentGlyph return currentGlyph - ]] [create-glyph @{".quote" (".WF" + externEnv.$nWFGlyphs$)} [lambda]]] + ]] [create-glyph @{".quote" (".WF" + externEnv.$nWFGlyphs$)} $donothing$]] define-macro branch : syntax-rules `[branch @::steps] : begin diff --git a/glyphs/letters-unified-extended.ptl b/glyphs/letters-unified-extended.ptl index 99ddba5..ff2ee97 100644 --- a/glyphs/letters-unified-extended.ptl +++ b/glyphs/letters-unified-extended.ptl @@ -1292,8 +1292,6 @@ symbol-block 'eszet' widths.center (STROKE * 1.1) corner tl (tm - STROKE) [heading UPWARD] corner (RIGHTSB - HALFSTROKE * 1.2 - OX) t [heading UPWARD] - set this.italicHookAttachPoint {.x (l + HALFSTROKE) .y 0} - save 'eszet' 0xDF sketch # Eszet diff --git a/makesupport.mk b/makesupport.mk index 274a243..8bac615 100644 --- a/makesupport.mk +++ b/makesupport.mk @@ -13,7 +13,7 @@ SCRIPTS = $(SUPPORT_FILES) buildglyphs.js SCRIPTS_FROM_aki = $(SUPPORT_FILES_FROM_aki) buildglyphs.js buildglyphs.js : buildglyphs.ptl $(GLYPH_SEGMENTS) - $(PATELC) --strict $< -o $@ + $(PATELC) --optimize --strict $< -o $@ $(SUPPORT_FILES_FROM_aki) : $(PATELC) --optimize --strict $< -o $@