diff options
author | Hans Hagen <pragma@wxs.nl> | 2019-05-29 21:10:47 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2019-05-29 21:10:47 +0200 |
commit | e2658addf306f729945c184e46f98df39dd7026c (patch) | |
tree | 0d4b3ec934773cc4e33fa88eda5a8041be2ec36b /tex/context/base/mkiv/spac-hor.mkiv | |
parent | 8b678f473da7b81842dbc13b50c6303991570521 (diff) | |
download | context-e2658addf306f729945c184e46f98df39dd7026c.tar.gz |
2019-05-29 19:20:00
Diffstat (limited to 'tex/context/base/mkiv/spac-hor.mkiv')
-rw-r--r-- | tex/context/base/mkiv/spac-hor.mkiv | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tex/context/base/mkiv/spac-hor.mkiv b/tex/context/base/mkiv/spac-hor.mkiv index c0c7d95d2..e51e54f29 100644 --- a/tex/context/base/mkiv/spac-hor.mkiv +++ b/tex/context/base/mkiv/spac-hor.mkiv @@ -1273,4 +1273,13 @@ \def\obeyfollowingtoken{{}} % end \cs scanning +%D Something new: + +\unexpanded\def\interwordspacebefore{\wordboundary\zwnj\hskip\interwordspace\relax} +\unexpanded\def\interwordspaceafter {\hskip\interwordspace\relax\zwnj\wordboundary} + +\unexpanded\def\interwordspacesbefore#1{\dofastloopcs{#1}\interwordspacebefore} +\unexpanded\def\interwordspacesafter #1{\dofastloopcs{#1}\interwordspaceafter} +\unexpanded\def\interwordspaces #1{\wordboundary\zwnj\dofastloopcs{\numexpr#1+\minusone}\interwordspaceafter} + \protect \endinput |