summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/pdftex/manual/syntaxform.awk
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/pdftex/manual/syntaxform.awk')
-rw-r--r--Master/texmf-dist/doc/pdftex/manual/syntaxform.awk15
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 " ";