[latex3-commits] [git/LaTeX3-latex3-latex2e] everymath: Suppress capture of $\m at th...$ (bad1e48e)

[Joseph Wright]

Repository : https://github.com/latex3/latex2e
On branch  : everymath
Link       : https://github.com/latex3/latex2e/commit/bad1e48e320fd6e10898e0af4dc142b6be791f7a

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

commit bad1e48e320fd6e10898e0af4dc142b6be791f7a
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Fri Jan 6 15:10:54 2023 +0000

    Suppress capture of $\m at th...$


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

bad1e48e320fd6e10898e0af4dc142b6be791f7a
 required/latex-lab/latex-lab-mathcapture.dtx                 | 6 ++++--
 required/latex-lab/testfiles-mathcapture/mathcapture-002.tlg | 3 ---
 2 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/required/latex-lab/latex-lab-mathcapture.dtx b/required/latex-lab/latex-lab-mathcapture.dtx
index 86ae5879..fe1c97e5 100644
--- a/required/latex-lab/latex-lab-mathcapture.dtx
+++ b/required/latex-lab/latex-lab-mathcapture.dtx
@@ -163,12 +163,14 @@
 % \subsection{Content grabbing}
 %
 % \begin{macro}{\@@_grab_dollar:w}
-%   Grab up to a single |$|, for inline math mode.
+%   Grab up to a single |$|, for inline math mode, suppressing
+%   any processing if the first token is \tn{m at th}.
 %    \begin{macrocode}
 \cs_new_protected:Npn \@@_grab_dollar:w % $
   #1 $
   {
-    \@@_process:nn { $ } {#1} % $
+    \tl_if_head_eq_meaning:nNF {#1} \m at th
+      { \@@_process:nn { $ } {#1} } % $
     #1 $
   }
 %    \end{macrocode}
diff --git a/required/latex-lab/testfiles-mathcapture/mathcapture-002.tlg b/required/latex-lab/testfiles-mathcapture/mathcapture-002.tlg
index 507e66a1..b7cf786f 100644
--- a/required/latex-lab/testfiles-mathcapture/mathcapture-002.tlg
+++ b/required/latex-lab/testfiles-mathcapture/mathcapture-002.tlg
@@ -3,9 +3,6 @@ Don't change this file in any respect.
 -----------------------------------
 Math env $
 \alpha \neq \beta \pmod x
------------------------------------
-Math env $
-\m at th \ast 
 Definitely broken because it should not capture math!
 -----------------------------------
 Math env equation