[latex3-commits] [git/LaTeX3-latex3-latex2e] lthooks2: don't use \str_use:n on a tl :-) (271f0e9a)

[Frank Mittelbach]

Repository : https://github.com/latex3/latex2e
On branch  : lthooks2
Link       : https://github.com/latex3/latex2e/commit/271f0e9af3114072ec98282f2a20fcc1d5982866

>---------------------------------------------------------------

commit 271f0e9af3114072ec98282f2a20fcc1d5982866
Author: Frank Mittelbach <frank.mittelbach at latex-project.org>
Date:   Sat Aug 22 22:13:02 2020 +0200

    don't use \str_use:n on a tl :-)


>---------------------------------------------------------------

271f0e9af3114072ec98282f2a20fcc1d5982866
 base/lthooks.dtx                       | 8 +++++++-
 base/testfiles-lthooks/lthooks-010.lvt | 2 +-
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/base/lthooks.dtx b/base/lthooks.dtx
index 77b619f2..eca2c763 100644
--- a/base/lthooks.dtx
+++ b/base/lthooks.dtx
@@ -3120,7 +3120,7 @@
         \iow_term:x{~Extra~ code~ next~ invocation:}
         \iow_term:x{\@spaces
           \tl_if_empty:cTF { g_@@_#1_next_code_tl }
-            {---} {->~ \str_use:c{g_@@_#1_next_code_tl} } }
+            {---} {->~ \exp_args:NNc \exp_args:No \@@_log_next_code:n {g_@@_#1_next_code_tl} } }
 %    \end{macrocode}
 %
 %   Loop through the rules in a hook and for every rule found, print it.
@@ -3165,6 +3165,12 @@
     \iow_term:n { }
   }
 %    \end{macrocode}
+%    
+%    \begin{macrocode}
+\cs_new:Npn \@@_log_next_code:n #1 {
+  \exp_args:No \tl_to_str:n{\use_none:nn #1}    
+}
+%    \end{macrocode}
 %  \end{macro}
 %
 % \begin{macro}{\@@_list_rules:nn}
diff --git a/base/testfiles-lthooks/lthooks-010.lvt b/base/testfiles-lthooks/lthooks-010.lvt
index f6ecb0b8..f04e8668 100644
--- a/base/testfiles-lthooks/lthooks-010.lvt
+++ b/base/testfiles-lthooks/lthooks-010.lvt
@@ -17,7 +17,7 @@
 \AddToHook     {sffamily}[legacy] {Std sffamily code}
 \AddToHook     {sffamily}[foo] {foo code}
 \AddToHook     {sffamily}[bar] {bar code}
-\AddToHookNext {sffamily} {first occasion only}
+\AddToHookNext {sffamily} {first occasion only $\frac12$}  % should not expand!
 
 \DeclareHookRule {sffamily} {foo} {after} {bar}
 \DeclareHookRule {sffamily} {baz} {voids} {foo}