ページスタイルで警告を出したい

名前: hideaki
日時: 2006-08-31 18:44:25
IPアドレス: 60.38.207.*

柱に必要な記述がない時に警告メッセージを出せるような
ページスタイルを作ろうと思ったのですがうまく行きません。


########################################
\documentclass[twoside]{jarticle}

\makeatletter
\def\HeaderL#1{\gdef\@HeaderL{#1}}\let\@HeaderL\relax
\def\HeaderR#1{\gdef\@HeaderR{#1}}\let\@HeaderR\relax
\def\@HeaderLx{\@ifundefined{@HeaderL}{\@latex@warning{No \noexpand\HeaderL given}}{\@HeaderL}}
\def\ps@myheadings{\let\ps@jpl@in\ps@plain
    \def\@evenhead{\leftmark}
    \def\@evenfoot{\hfil\thepage\hfil}
    \def\@oddhead{\rightmark}
    \def\@oddfoot{\hfil\thepage\hfil}
  \let\@mkboth\markboth
      \markboth{\hfill\@HeaderR}{\protect\@HeaderLx\hfill}
}
\makeatother

%%\HeaderL{左詰めの柱}
\HeaderR{右詰めの柱}

\begin{document}
\pagestyle{myheadings}

１頁目

\clearpage
２頁目

\clearpage
３頁目

\end{document}

########################################


と、してみたのですが log ファイルにはページの数だけ何回も警告が出ます。
最初の一度だけにしたいのですが、
私のつたない知識ではすっかりお手上げになってしまいました。
マクロ自体もスマートさに欠けていてお恥ずかしい限りですが、
なにとぞヒントなりとも頂ければ幸いです。

この書き込みへの返事：