☰

função expl3 não expandida dentro de `\label{...}`

tag-icon • tag-icon expansion expl3
função expl3 não expandida dentro de `\label{...}`

Problema

Eu gostaria de usar uma função expl3 dentro de um arquivo \label{...}.

%!TEX program=xelatex
\documentclass{article}

\usepackage{l3regex}

\ExplSyntaxOn
    \tl_new:N \l_slugify_tl
    \cs_new:Npn \slugify #1 {
        \tl_set:Nf \l_slugify_tl { \tl_lower_case:n { #1 } } %lower case
        \regex_replace_all:nnN { [^a-z]+ }{ - }\l_slugify_tl % remove non-letters
        \regex_replace_all:nnN { (^-|-$$$$) }{ } \l_slugify_tl % clean up leading/trailing dashes
        \tl_use:N \l_slugify_tl
    }
\ExplSyntaxOff


\begin{document}

\subsection{The Explanation}
    \label{wiki:\slugify{The Explanation}}

\end{document}

Ao compor o documento, recebo uma

) (./test-regex-slug.aux
! Undefined control sequence.
<argument> r@wiki:\tl 
                      _set:Nf {the explanation}\regex _replace_all:nnN {[^a-...
l.3 ...x_replace_all:nnN {(^-|-$$$$)}{}}{{0.1}{1}}

Aparentemente, o conteúdo de \slugifynão é expandido e o código expl3 é gravado diretamente no arquivo aux. Como posso evitar isso e fazer meu código funcionar?

Fundo

Gostaria de simplificar o uso de referências cruzadas dentro do meu (enorme) documento. Eu digitaria algo como

... e.g. using a \linkR{Time of Flight} detector.
That \linkR{TOF} would ...

% ...

\section{\anchorR{Time of Flight} Detector (\aliasR{TOF})}
% ...

em vez de

...e.g. using a \hyperref[time-of-flight]{Time of Flight} detector.
That \hyperref[time-of-flight]{TOF} would...

% ...

\section{Time of Flight Detector (TOF)} \label{time-of-flight} \label{tof}
% ...

Responder1

O que você quer fazer simplesmente não é possível. A atualização e as atribuições de Regex não são expansíveis e podem, portanto,nuncaser usado em um contexto de expansão completo de, por exemplo, \label.

No entanto, você pode fazer coisas como salvar o rótulo processado em uma macro e passá-lo adiante ou simplesmente fazer com que sua \slugifymacro coloque o rótulo imediatamente, etc.

Sempre que você estiver fazendo essas coisas, tenha esta citação em mente:

»Isso não é tão produtivo quanto você imagina no longo prazo.« — percussão

\documentclass{article}

\usepackage{xparse}

\ExplSyntaxOn

\tl_new:N \l_slugify_tl

\NewDocumentCommand \slugify { m m m }
{
  \tl_set:Nf \l_slugify_tl { \tl_lower_case:n { #3 } } %lower case
  \regex_replace_all:nnN { [^a-z]+ }{ - }\l_slugify_tl % remove non-letters
  \regex_replace_all:nnN { (^-|-$$$$) }{ } \l_slugify_tl % clean up leading/trailing dashes
  #1 { #2 \tl_use:N \l_slugify_tl }
}

\ExplSyntaxOff

\begin{document}

\subsection{The Explanation}
    \slugify{\label}{wiki:}{The Explanation}

\end{document}

informação relacionada