diff options
Diffstat (limited to 'Master/texmf-dist/doc/pdftex/manual/syntaxform.awk')
-rw-r--r-- | Master/texmf-dist/doc/pdftex/manual/syntaxform.awk | 15 |
1 files changed, 10 insertions, 5 deletions
diff --git a/Master/texmf-dist/doc/pdftex/manual/syntaxform.awk b/Master/texmf-dist/doc/pdftex/manual/syntaxform.awk index 005aeb8a5e3..cdabfe77f82 100644 --- a/Master/texmf-dist/doc/pdftex/manual/syntaxform.awk +++ b/Master/texmf-dist/doc/pdftex/manual/syntaxform.awk @@ -1,5 +1,6 @@ -#$Id: syntaxform.awk 635 2010-11-14 19:15:12Z karl $ -# pdftex-t.tex --> pdftex-syntax.txt +# $Id: syntaxform.awk 742 2016-04-25 17:30:55Z karl $ +# Public domain. Originally written by Petr Olsak. +# pdftex-syntax.tex and pdftex-t.tex --> pdftex-syntax.txt # requires gawk due to gensub() function BEGIN{ @@ -88,12 +89,16 @@ BEGIN{ gsub(/\\Next /, ""); } -/\\Whatever/ { +/\\unkern/ { + gsub(/\\unkern */, ""); +} + +/\\(Whatever|Modelist)/ { whatind = 57; - whatpos = match($0, /\\Whatever/); + whatpos = match($0, /\\(Whatever|Modelist)/); b = substr($0, 0, whatpos - 1) c = substr($0, whatpos) - c = gensub(/\\Whatever *{([^}]*)}/, "(\\1)", "g", c); + c = gensub(/\\(Whatever|Modelist) *{([^}]*)}/, "(\\2)", "g", c); $0 = b; for(i = whatpos; i < whatind; i++) $0 = $0 " "; |