summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--letterspace.tex16
-rw-r--r--t-letterspace.mkiv4
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\ }%