条件文 - ドキュメント内で指定されたコマンドが使用されている場合に何かを実行する

Question

何かを実行できる条件文を持つことは可能でしょうかもし特定のコマンドが使用されている書類? たとえば、\partコマンドは次のようになります。

\@ifcommandisbeingused{\part}{<then>}{<else>}

説明

次のようにすると、\bfseriesTOCの章エントリの が回避されます。これは、\partコマンドが書類。

\documentclass{book}

\makeatletter

\@ifcommandisbeingused{\part}
{  
\renewcommand*\l@chapter[2]{%
  \ifnum \c@tocdepth >\m@ne
    \addpenalty{-\@highpenalty}%
    \vskip 1.0em \@plus\p@
    \setlength\@tempdima{1.5em}%
    \begingroup
      \parindent \z@ \rightskip \@pnumwidth
      \parfillskip -\@pnumwidth
      \leavevmode
      \advance\leftskip\@tempdima
      \hskip -\leftskip
      #1\nobreak\hfil \nobreak\hb@xt@\@pnumwidth{\hss #2}\par
      \penalty\@highpenalty
    \endgroup
  \fi}
}{}

\makeatother    

\begin{document}

\part{Lorem}
\chapter{Ipsum}

\end{document}

---

追伸

TeX/LaTeX 言語では、「非常に低レベル」のマクロでのみ大文字を使用するのが一般的であることを思い出し、 に\@ifcommandIsBeingUsed変更しました。\@ifcommandisbeingused

Answer 1

\jobname.useこのソリューションは、使用されたコマンドを追跡するファイルを作成します。 を実行して、リストにコマンドを追加します\ifused\<command>{<hook>}。例では、 を使用して\patchcmdからをetoolbox削除しました。同じコマンドを 2 回実行すると、エラーが発生します。\bfseries\l@chapter\ifused

\documentclass{book}
\usepackage{xparse,etoolbox}
\ExplSyntaxOn

\file_if_exist:nT { \c_job_name_tl . use }
 { \file_input:n { \c_job_name_tl . use } }

\iow_new:N \l_cloud_used_stream
\iow_open:Nn \l_cloud_used_stream { \c_job_name_tl . use  }
\AtEndDocument { \iow_close:N \l_cloud_used_stream }

\cs_new_protected:Npn \cloud_is_used:N #1
 {
  \iow_now:Nx \l_cloud_used_stream
   { \exp_not:N \bool_set_true:c { l _ cloud _ if \cs_to_str:N #1 _ bool } }
 }

\NewDocumentCommand{\ifused}{mm}
 {
  \preto #1 { \cloud_is_used:N #1 }
  \iow_now:Nx \l_cloud_used_stream
   { \exp_not:N \bool_new:c { l _ cloud _ if \cs_to_str:N #1 _ bool } }
  \bool_if:cT { l _ cloud _ if \cs_to_str:N #1 _ bool } { #2 }
 }

\ExplSyntaxOff

\makeatletter
\ifused\part{\patchcmd\l@chapter{\bfseries}{}{}{}}
\makeatother

\begin{document}
\tableofcontents
\chapter{Before first part}
\part{First part}
\chapter{After first part}
\part{Second part}
\end{document}