diff options
Diffstat (limited to 'Master/texmf-dist/tex/context/base/supp-fil.tex')
-rw-r--r-- | Master/texmf-dist/tex/context/base/supp-fil.tex | 14 |
1 files changed, 11 insertions, 3 deletions
diff --git a/Master/texmf-dist/tex/context/base/supp-fil.tex b/Master/texmf-dist/tex/context/base/supp-fil.tex index cd0c48150e8..da4b595b844 100644 --- a/Master/texmf-dist/tex/context/base/supp-fil.tex +++ b/Master/texmf-dist/tex/context/base/supp-fil.tex @@ -509,7 +509,7 @@ {\sanitizefilename#1\to\readfilename \checkfilename\readfilename \ifcase\kindoffile - \edef\locreadfilename{\pathplusfile\f!currentpath{#1}}% + \edef\readfilename{\pathplusfile\f!currentpath{#1}}% \fi} %D \macros @@ -591,6 +591,8 @@ %D regards to active characters (german ", polish /, %D french : and ;). +%D We need to redo this: catcode sets and such + \def\startreadingfile% beter een every en \setnormalcatcodes {\doglobal\increment\readingfilelevel \setxvalue{\string\readingfilelevel::\readingfilelevel}% @@ -615,11 +617,17 @@ \catcode`\\=\@@escape \catcode`\{=\@@begingroup \catcode`\}=\@@endgroup - \catcode`\%=\@@comment} + \catcode`\%=\@@comment + \pushendofline + \restoreendofline} \def\stopreadingfile - {\getvalue{\string\readingfilelevel::\readingfilelevel}% + {\popendofline + \getvalue{\string\readingfilelevel::\readingfilelevel}% \doglobal\decrement\readingfilelevel} + +\let\normalstartreadingfile\startreadingfile +\let\normalstopreadingfile \stopreadingfile %D \macros %D {splitfilename} |