無法使用“\patchcmd”修補“\hyper@normalise”指令

Question

是否可以在\hyper@normalise命令中添加一個鉤子而不覆蓋所有巨集。我希望在巨集末尾添加一個鉤子，然後\hyper@n@rmalise我可以添加自訂定義來規範化。

這就是我想要實現的目標：

\begingroup
  \endlinechar=-1 %
  \catcode`\^^A=14 %
  \catcode`\^^M\active
  \catcode`\%\active
  \catcode`\#\active
  \catcode`\_\active
  \catcode`\$\active
  \catcode`\&\active
  \gdef\hyper@normalise{^^A
    \begingroup
    \catcode`\^^M\active
    \def^^M{ }^^A
    \catcode`\%\active
    \let%\@percentchar
    \let\%\@percentchar
    \catcode`\#\active
    \def#{\hyper@hash}^^A
    \def\#{\hyper@hash}^^A
    \@makeother\&^^A
    \edef&{\string&}^^A
    \edef\&{\string&}^^A
    \edef\textunderscore{\string_}^^A
    \let\_\textunderscore
    \catcode`\_\active
    \let_\textunderscore
    \let~\hyper@tilde
    \let\~\hyper@tilde
    \let\textasciitilde\hyper@tilde
    \let\\\@backslashchar
    \edef${\string$}^^A
    \Hy@safe@activestrue
    \csname hyper@normalise@hook\endcsname % <--HERE
    \hyper@n@rmalise
  }^^A
\endgroup

但我想做到\patchcmd這一點，我不需要將其冷凍\hyper@normalise在我的包裹中。在這個巨集中，很多catcodes被改變，所以它給了一個錯誤：

Runaway definition?
\active \def  \catcode `\
! File ended while scanning definition of \etb@resrvda.

微量元素：

\documentclass{article}
\usepackage{etoolbox}
\usepackage{hyperref}

\makeatletter
\patchcmd\hyper@normalise{\hyper@n@rmalise}{\csname hyper@normalise@hook\endcsname \hyper@n@rmalise}{}{}
\show\hyper@normalise
\makeatother

\begin{document}
aa
\end{document}