diff options
author | Karl Berry <karl@freefriends.org> | 2023-10-25 20:00:42 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2023-10-25 20:00:42 +0000 |
commit | 7f3dfb9f769892bef6b4d1e272142c9e43ea3bf6 (patch) | |
tree | d9e5805b5585ab53f9532333a905948dcfccfc33 /Master/texmf-dist/tex | |
parent | 235615565cf5ad8abf385604c6f4df804d5f59c4 (diff) |
advice (25oct23)
git-svn-id: svn://tug.org/texlive/trunk@68648 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex')
4 files changed, 23 insertions, 9 deletions
diff --git a/Master/texmf-dist/tex/context/third/advice/t-advice.tex b/Master/texmf-dist/tex/context/third/advice/t-advice.tex index dcffe7205e3..e30bed0869a 100644 --- a/Master/texmf-dist/tex/context/third/advice/t-advice.tex +++ b/Master/texmf-dist/tex/context/third/advice/t-advice.tex @@ -23,20 +23,22 @@ %% This work has the LPPL maintenance status `maintained'. %% The Current Maintainer of this work is Saso Zivanovic. %% -%% The files belonging to this work and covered by LPPL are listed in `FILES`. +%% The files belonging to this work and covered by LPPL are listed in +%% (<texmf>/doc/generic/advice/)FILES. %D \module[ %D file=t-advice.tex, %D version=1.0.1, %D title=Advice, %D subtitle=Extend commands and environments, %D author=Saso Zivanovic, -%D date=2023-09-10, +%D date=2023-10-24, %D copyright=Saso Zivanovic, %D license=LPPL, %D ] \writestatus{loading}{ConTeXt User Module / advice} \unprotect \startmodule[advice] +\input miniltx \input t-collargs \pgfkeys{ /handlers/.install advice/.code={% @@ -410,7 +412,8 @@ \let\advice@init@i\advice@setup@init@i \let\advice@init@I\advice@setup@init@I } -\def\advice@trace#1{\immediate\write16{[tracing advice] #1}} + \long\def\advice@typeout#1{\directlua{texio.write_nl("\luaescapestring{#1}")}} +\def\advice@trace#1{\advice@typeout{[tracing advice] #1}} \def\advice@trace@init@i#1#2{% \advice@trace{Advising \detokenize\expandafter{\string#2} (\detokenize{#1})}% \advice@setup@init@i{#1}{#2}% diff --git a/Master/texmf-dist/tex/generic/advice/advice-tikz.code.tex b/Master/texmf-dist/tex/generic/advice/advice-tikz.code.tex index 7bc9dac90cd..6159b6a67af 100644 --- a/Master/texmf-dist/tex/generic/advice/advice-tikz.code.tex +++ b/Master/texmf-dist/tex/generic/advice/advice-tikz.code.tex @@ -23,7 +23,8 @@ %% This work has the LPPL maintenance status `maintained'. %% The Current Maintainer of this work is Saso Zivanovic. %% -%% The files belonging to this work and covered by LPPL are listed in `FILES`. +%% The files belonging to this work and covered by LPPL are listed in +%% (<texmf>/doc/generic/advice/)FILES. \edef\mmzresetatcatcode{\catcode`\noexpand\@\the\catcode`\@\relax}% \catcode`\@=11 \def\AdviceCollectTikZArguments{% diff --git a/Master/texmf-dist/tex/latex/advice/advice.sty b/Master/texmf-dist/tex/latex/advice/advice.sty index c10d9e566ea..5678958cb59 100644 --- a/Master/texmf-dist/tex/latex/advice/advice.sty +++ b/Master/texmf-dist/tex/latex/advice/advice.sty @@ -23,9 +23,11 @@ %% This work has the LPPL maintenance status `maintained'. %% The Current Maintainer of this work is Saso Zivanovic. %% -%% The files belonging to this work and covered by LPPL are listed in `FILES`. -\ProvidesPackage{advice}[2023/10/10 v1.0.0 Extend commands and environments] +%% The files belonging to this work and covered by LPPL are listed in +%% (<texmf>/doc/generic/advice/)FILES. +\ProvidesPackage{advice}[2023/10/24 v1.0.1 Extend commands and environments] \RequirePackage{collargs} +\RequirePackage{xparse} \pgfkeys{ /handlers/.install advice/.code={% \edef\auto@install@namespace{\pgfkeyscurrentpath}% @@ -426,7 +428,8 @@ \let\advice@init@i\advice@setup@init@i \let\advice@init@I\advice@setup@init@I } -\def\advice@trace#1{\immediate\write16{[tracing advice] #1}} + \def\advice@typeout{\immediate\write\@unused} +\def\advice@trace#1{\advice@typeout{[tracing advice] #1}} \def\advice@trace@init@i#1#2{% \advice@trace{Advising \detokenize\expandafter{\string#2} (\detokenize{#1})}% \advice@setup@init@i{#1}{#2}% diff --git a/Master/texmf-dist/tex/plain/advice/advice.tex b/Master/texmf-dist/tex/plain/advice/advice.tex index 90b8d472ef1..b648020d0c1 100644 --- a/Master/texmf-dist/tex/plain/advice/advice.tex +++ b/Master/texmf-dist/tex/plain/advice/advice.tex @@ -23,7 +23,9 @@ %% This work has the LPPL maintenance status `maintained'. %% The Current Maintainer of this work is Saso Zivanovic. %% -%% The files belonging to this work and covered by LPPL are listed in `FILES`. +%% The files belonging to this work and covered by LPPL are listed in +%% (<texmf>/doc/generic/advice/)FILES. +\input miniltx \input collargs \pgfkeys{ /handlers/.install advice/.code={% @@ -395,7 +397,12 @@ \let\advice@init@i\advice@setup@init@i \let\advice@init@I\advice@setup@init@I } -\def\advice@trace#1{\immediate\write16{[tracing advice] #1}} +\ifdefined\luatexversion + \long\def\advice@typeout#1{\directlua{texio.write_nl("\luaescapestring{#1}")}} +\else + \def\advice@typeout{\immediate\write128} +\fi +\def\advice@trace#1{\advice@typeout{[tracing advice] #1}} \def\advice@trace@init@i#1#2{% \advice@trace{Advising \detokenize\expandafter{\string#2} (\detokenize{#1})}% \advice@setup@init@i{#1}{#2}% |