Re: enumerate環境

名前: トニイ＠FTEX
日時: 2001-12-18 18:39:08
IPアドレス: 61.198.83.*

>>4539
>標準のクラスファイルのenumerate環境やitemize環境では項目間の空きや同じ項目内の
>第1段落と第2段落の間の空きが広すぎるように感じます。
>
>これを解消するにはどうすればいいですか?

enumerate 環境や itemize 環境は list 環境を使って定義されています。
項目間の空き幅を設定しているパラメータ(\itemsep・\paesep)を \z@(0pt) に
再定義すれば良いでしょう。

pLaTeX2e でも縦書きの場合には，これらのパラメータは \z@(0pt) となっているので
横書きでも有効になるように再定義します。

% pLaTeX2e
\documentclass[a4j]{jarticle}
\makeatletter
%% enumerate 環境の再定義
\renewenvironment{enumerate}
  {\ifnum \@enumdepth >\thr@@\@toodeep\else
   \advance\@enumdepth\@ne
   \edef\@enumctr{enum\romannumeral\the\@enumdepth}%
   \list{\csname label\@enumctr\endcsname}{%
      \iftdir
         \ifnum \@listdepth=\@ne \topsep.5\normalbaselineskip
           \else\topsep\z@\fi
% ここにあった行を下に移動
         \labelwidth1zw \labelsep.3zw
         \ifnum \@enumdepth=\@ne \leftmargin1zw\relax
           \else\leftmargin\leftskip\fi
         \advance\leftmargin 1zw
      \fi
         \parskip\z@ \itemsep\z@ \parsep\z@% この行が移動
         \usecounter{\@enumctr}%
         \def\makelabel##1{\hss\llap{##1}}}%
   \fi}{\endlist}
%%
%% itemize 環境の再定義
\renewenvironment{itemize}
  {\ifnum \@itemdepth >\thr@@\@toodeep\else
   \advance\@itemdepth\@ne
   \edef\@itemitem{labelitem\romannumeral\the\@itemdepth}%
   \expandafter
   \list{\csname \@itemitem\endcsname}{%
      \iftdir
         \ifnum \@listdepth=\@ne \topsep.5\normalbaselineskip
           \else\topsep\z@\fi
% ここにあった行を下に移動
         \labelwidth1zw \labelsep.3zw
         \ifnum \@itemdepth =\@ne \leftmargin1zw\relax
           \else\leftmargin\leftskip\fi
         \advance\leftmargin 1zw
      \fi
         \parskip\z@ \itemsep\z@ \parsep\z@% この行が移動
         \def\makelabel##1{\hss\llap{##1}}}%
   \fi}{\endlist}
\makeatother
\begin{document}
\begin{enumerate}
\item あいうえお
\item かきくけこ
\end{enumerate}
\begin{itemize}
\item あいうえお
\item かきくけこ
\end{itemize}
\end{document}

この書き込みへの返事：