Попытка написать функцию по борьбе с неэкранированными символами в ссылках из библиографии LaTeX

escaping_url.tex

\makeatletter
\verbtocs{\diez} |#|
\newcommand*{\doit}[2]{%
  \StrSubstitute{#2}{_}{\_}[\doit@text]%
%  \StrSubstitute{\doit@text}{\diez}{\diez}[\doit@text]%
  \StrSubstitute{\doit@text}{<}{\textless}[\doit@text]%
  \StrSubstitute{\doit@text}{>}{\textgreater}[\doit@text]%
  \StrSubstitute{#1}{<}{\@percentchar3C}[\doit@link]%
%  \StrSubstitute{\doit@link}{\diez}{\%23}[\doit@link]%
  \StrSubstitute{\doit@link}{>}{\@percentchar3E}[\doit@link]%
  \href{\doit@link}%
       {\doit@text}%
}
\makeatother