diff options
| -rw-r--r-- | letterspace.tex | 16 | ||||
| -rw-r--r-- | t-letterspace.mkiv | 4 |
2 files changed, 10 insertions, 10 deletions
diff --git a/letterspace.tex b/letterspace.tex index c874b0b..df70922 100644 --- a/letterspace.tex +++ b/letterspace.tex @@ -4,24 +4,28 @@ \setupletterspace [largecaps] [ spacefactor=.2, spaceskip=.3em, + suppresskern=yes, ] \defineletterspace [mediumcaps] \setupletterspace [mediumcaps] [ spacefactor=.25, spaceskip=.5em, + suppresskern=yes, ] \defineletterspace [smallcaps] \setupletterspace [smallcaps] [ spacefactor=.05, spaceskip=.25em, + suppresskern=no, ] \defineletterspace [textemph] \setupletterspace [textemph] [ spacefactor=.125, spaceskip=.33em, + suppresskern=no, ] \let\te\textemph @@ -31,6 +35,7 @@ \setupletterspace [ugly] [ spacefactor=.4, spaceskip=1em, + suppresskern=no, ] @@ -48,9 +53,6 @@ liga=yes, ] -\definefontfeature [nokerning] [kern=no,liga=no,dlig=no] - - \usetypescript [antykwa-poltawskiego] \setupbodyfont [antykwa-poltawskiego,10pt] @@ -173,9 +175,9 @@ \setupletterspace [LSsection] [spacefactor=.15, spaceskip=.40em] \setupletterspace [LSsubsection] [spacefactor=.125,spaceskip=.33em] -\def \fontchapter#1{\setupbodyfont[11pt]\setfontfeature{nokerning}\WORD\LSchapter{#1}} -\def \fontsection#1{\setupbodyfont[11pt]\setfontfeature{nokerning}\word\sc\LSsection{#1}} -\def\fontsubsection#1{\setupbodyfont[11pt]\setfontfeature{nokerning}\LSsubsection{#1}} +\def \fontchapter#1{\setupbodyfont[11pt]\WORD\LSchapter{#1}} +\def \fontsection#1{\setupbodyfont[11pt]\word\sc\LSsection{#1}} +\def\fontsubsection#1{\setupbodyfont[11pt]\LSsubsection{#1}} \def \Chapterheadfontcmd{\fontchapter} \def \Sectionheadfontcmd{\fontsection} @@ -386,7 +388,7 @@ \vfill {\tfc\italic The}\par \vfill - {\tfd\WORD\setfontfeature{nokerning}\largecaps{Letterspace Module}}\par + {\tfd\WORD\largecaps{Letterspace Module}}\par \vfill {\tfc\italic for {\CONTEXT} MkIV}\par \vfill diff --git a/t-letterspace.mkiv b/t-letterspace.mkiv index 509e4aa..0cdc7ac 100644 --- a/t-letterspace.mkiv +++ b/t-letterspace.mkiv @@ -79,10 +79,8 @@ \advance \spaceskip \letterspaceparameter{spaceskip}% \advance \xspaceskip \letterspaceparameter{spaceskip}% \doifinset{\letterspaceparameter{suppresskern}}{\letterspace_truevalues}{% - %\addfontfeaturetofont{letterspace:nokern}% - %\setff{letterspace:nokern}% \subtractfontfeaturefromfont{letterspace:kerning}% - } + }% }% \ifhmode\ifnum\lastnodetype=\@@gluenode \unskip{\letterspace_setstuff\ }% |