Gregoriotex 与 fancyhdr 严重干扰，如何解决？

Question

任何解决此问题的方法都应该涉及在排版受影响的页眉和页脚之前禁用这两个过滤器fancyhdr，然后将它们重置为最后的值。因此，我定义了两个宏来执行此操作。我没有关于分数是否有效的任何信息，因此我仅检查过滤器是否有效。我必须保留该信息直到最后才能决定是否应该恢复它们。我可以将一些布尔值放在 TeX 变量中，但我决定使用 luatex 构建命令以在测试期间恢复它们tex.print。理想情况下，这些宏应该在内部定义gregoriotex。一个问题是，在恢复时，所需的函数post_linebreak和disable_hyphenation是本地的gregoriotex.lua，所以我不能在外面使用它们。我在中添加了以下几行来gregoriotex.lua解决这个问题：

gregoriotex.post_linebreak               = post_linebreak
gregoriotex.disable_hyphenation          = disable_hyphenation

此宏禁用过滤器并记录恢复它们的代码：

\newcommand\gregoriodisable{\edef\filterrestore{\directlua{%
      local b
      b = luatexbase.in_callback('post_linebreak_filter', 'gregoriotex.post_linebreak')
      if b then 
        luatexbase.remove_from_callback('post_linebreak_filter', 'gregoriotex.post_linebreak')
        tex.print("luatexbase.add_to_callback('post_linebreak_filter', gregoriotex.post_linebreak, 'gregoriotex.post_linebreak', 1)")
      end
      b = luatexbase.in_callback('hyphenate', 'gregoriotex.disable_hyphenation')
      if b then 
        luatexbase.remove_from_callback('hyphenate', 'gregoriotex.disable_hyphenation')
        tex.print("luatexbase.add_to_callback('hyphenate', gregoriotex.disable_hyphenation, 'gregoriotex.disable_hyphenation', 1)")
      end
    }}}

它构建了一个\filterrestore包含 Lua 代码的命令，用于恢复现有的过滤器。这是用于恢复这些过滤器的 LaTeX 宏：

\newcommand\gregorioenable{\directlua{\filterrestore}}

然后我可以在受影响的标题中使用这些：

\fancyhead[R]{%
  \gregoriodisable
  \parbox{0.4\textwidth}{This is a header with a hyphenated line of text in a parbox}
  \gregorioenable
}

也许有更简单的方法，但至少这个是有效的。

以下是示例的完整代码：

\documentclass[11pt]{article}

\usepackage[autocompile]{gregoriotex}
\usepackage[latin]{babel}
\usepackage{xcolor}
\usepackage{fancyhdr}
\pagestyle{fancy}
\setlength{\headheight}{40pt}
\newcommand\filterrestore{}
\newcommand\gregoriodisable{\edef\filterrestore{\directlua{%
      local b
      b = luatexbase.in_callback('post_linebreak_filter', 'gregoriotex.post_linebreak')
      if b then 
        luatexbase.remove_from_callback('post_linebreak_filter', 'gregoriotex.post_linebreak')
        tex.print("luatexbase.add_to_callback('post_linebreak_filter', gregoriotex.post_linebreak, 'gregoriotex.post_linebreak', 1)")
      end
      b = luatexbase.in_callback('hyphenate', 'gregoriotex.disable_hyphenation')
      if b then 
        luatexbase.remove_from_callback('hyphenate', 'gregoriotex.disable_hyphenation')
        tex.print("luatexbase.add_to_callback('hyphenate', gregoriotex.disable_hyphenation, 'gregoriotex.disable_hyphenation', 1)")
      end
    }}}
\newcommand\gregorioenable{\directlua{\filterrestore}}

\fancyhead[R]{%
  \gregoriodisable
  \parbox{0.4\textwidth}{This is a header with a hyphenated line of text in a parbox}
  \gregorioenable
}

\def\move{\rule[-0.2em]{0.4pt}{1em}\,}

\gresethyphen{force}

\grechangedim{afterinitialshift}{2.2mm}{scalable}
\grechangedim{beforeinitialshift}{2.2mm}{scalable}

\grechangestyle{initial}{%
\fontsize{40}{40}\selectfont}%

\grechangestyle{annotation}{\scshape\bfseries\small}

\grechangestaffsize{15}

\begin{document}


\section*{Magnificat}
\vspace{1.5cm}\gresetinitiallines{0}
\gregorioscore{Magnificat}
\gresetinitiallines{1}\vspace{1.5cm}

\end{document}

必须将这些命令放在每个可能受影响的页眉/页脚中很烦人，因此在下一个版本中fancyhdr我将放置可以使用的钩子。

\AddToHook{fancyhdr/init}{\gregoriodisable}
\AddToHook{fancyhdr/exit}{\gregorioenable}

如果在内完成此操作gregoriotex，那么这些钩子就可以添加到乐谱的开头，并在乐谱的结尾删除。这样\gregoriodisable就不需要里面的测试了，代码就可以大大简化。

由于问题不仅限于fancyhdr，还可能影响构建页眉和页脚的其他包，也可能影响shipout钩子或类似包中的代码atbegshi，我认为最好在输出例程之前和之后执行这些宏。不幸的是，没有钩子可以解决这个问题，即使有，一些类和包也会更改输出例程，它们也必须提供相同的钩子。我不知道最好的解决方案是什么。

Answer 1