diff options
| author | Hans Hagen <pragma@wxs.nl> | 2021-02-05 18:08:41 +0100 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2021-02-05 18:08:41 +0100 |
| commit | 5a7dd5d18ced4a73b05467f208d4c4b0d1afebc0 (patch) | |
| tree | 7138a651a94fb013e584b080c50c4681321617cc /tex/context/base/mkiv/spac-hor.mkiv | |
| parent | ab4fc27d8b1541b491621e07ab1f40f30aaf50ae (diff) | |
| download | context-5a7dd5d18ced4a73b05467f208d4c4b0d1afebc0.tar.gz | |
2021-02-05 17:44:00
Diffstat (limited to 'tex/context/base/mkiv/spac-hor.mkiv')
| -rw-r--r-- | tex/context/base/mkiv/spac-hor.mkiv | 17 |
1 files changed, 13 insertions, 4 deletions
diff --git a/tex/context/base/mkiv/spac-hor.mkiv b/tex/context/base/mkiv/spac-hor.mkiv index 5c7163822..16a1a0d4e 100644 --- a/tex/context/base/mkiv/spac-hor.mkiv +++ b/tex/context/base/mkiv/spac-hor.mkiv @@ -478,11 +478,20 @@ %D from now on we treat it as a normal space and not as a space with \type %D {sfcode} 1000. +% \unexpanded\def\specialspaceprimitive +% {\begingroup +% % so, no fancy extra spacing after: foo i.e.\ bar +% \nonfrenchspacing\normalspaceprimitive +% \endgroup} + \unexpanded\def\specialspaceprimitive - {\begingroup - % so, no fancy extra spacing after: foo i.e.\ bar - \nonfrenchspacing\normalspaceprimitive - \endgroup} + {% is a current state, set explicitly or when a character is appended + \ifhmode + \spacefactor\plusthousand + \else + \dontleavehmode + \fi + \normalspaceprimitive} \unexpanded\def\normalnotobeyedspace {\mathortext\normalspaceprimitive\specialspaceprimitive} % no \dontleavehmode\space (else no frenchspacing) |