diff options
author | Context Git Mirror Bot <phg42.2a@gmail.com> | 2014-05-03 13:55:34 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2014-05-03 13:55:34 +0200 |
commit | 624cbb5da392e9403984dd1cf368c0d408b1c2a8 (patch) | |
tree | 489c049ac849bb5bbce7d32e4df477872c58373d /tex/context/base/lang-rep.mkiv | |
parent | 088de88944c1f2254250bb448c7371a87ff7ee39 (diff) | |
download | context-624cbb5da392e9403984dd1cf368c0d408b1c2a8.tar.gz |
2014-01-03 00:42:00
Diffstat (limited to 'tex/context/base/lang-rep.mkiv')
-rw-r--r-- | tex/context/base/lang-rep.mkiv | 75 |
1 files changed, 0 insertions, 75 deletions
diff --git a/tex/context/base/lang-rep.mkiv b/tex/context/base/lang-rep.mkiv deleted file mode 100644 index b3f21f22a..000000000 --- a/tex/context/base/lang-rep.mkiv +++ /dev/null @@ -1,75 +0,0 @@ -%D \module -%D [ file=lang-rep, -%D version=2013.04.28, -%D title=\CONTEXT\ Language Macros, -%D subtitle=Substitution, -%D author=Hans Hagen, -%D date=\currentdate, -%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}] -%C -%C This module is part of the \CONTEXT\ macro||package and is -%C therefore copyrighted by \PRAGMA. See mreadme.pdf for -%C details. - -%D As I needed an example of messing with nodes for the bacho\TEX\ tutorial -%D I cooked up this. In the end I decided to stick to a simpler example and -%D just finished this off in case someone really needs it. - -\writestatus{loading}{ConTeXt Language Macros / Replacements} - -\unprotect - -\registerctxluafile{lang-rep}{1.001} - -\definesystemattribute[replacements][public] - -%D \startluacode -%D -%D -- todo: other nodes (prelude to more experiments with auto dropped caps) -%D -%D languages.replacements.add("basics", { -%D ["aap"] = "monkey", -%D ["noot"] = "nut", -%D ["never"] = "forever", -%D ["newer"] = "cooler", -%D ["new"] = "cool", -%D -- ["special"] = "veryspe{>>>}{<<<}{=}cial", -%D }) -%D -%D \stopluacode -%D -%D \replaceword[more][this][that] -%D \replaceword[more][crap][support] -%D \replaceword[more][---][—] -%D \replaceword[basics][special][veryspe{>>>}{<<<}{=}cial] -%D -%D \starttyping -%D \start \setreplacements[basics] What the heck, it's now or never, isn't it new? \par \stop -%D \start \setreplacements[more] Do we --- {\it really} --- need this kind of crap? \par \stop -%D \start \setreplacements[basics] All kinds of special thingies! \par \stop -%D \start \setreplacements[basics] \hsize1mm special \par \stop -%D \stoptyping - -\unexpanded\def\setreplacements[#1]% - {\ctxcommand{setreplacements("#1")}} - -\unexpanded\def\resetreplacements - {\attribute\replacementsattribute\attributeunsetvalue} - -\unexpanded\def\replaceword - {\dotripleargument\languages_replacements_replace} - -\unexpanded\def\languages_replacements_replace[#1][#2][#3]% - {\ifthirdargument - \ctxcommand{addreplacements("#1",\!!bs#2\!!es,\!!bs#3\!!es)}% - \fi} - -\appendtoks - \resetreplacements -\to \everyresettypesetting - -\appendtoks - \resetreplacements -\to \everyinitializeverbatim - -\protect \endinput |