\NeedsTeXFormat{LaTeX2e}[1997/12/01] \ProvidesPackage{shortlst} [1998/11/27 version 1.1] \newlength\runitemsep \setlength\runitemsep{1em plus .5em minus .5em} \newenvironment{runitemize}{% \ifnum \@itemdepth >\thr@@\@toodeep\else \advance\@itemdepth\@ne \edef\@itemitem{labelitem\romannumeral\the\@itemdepth}% \def\@itemlabel{\csname\@itemitem\endcsname}% \let\@item\run@item \let\par\relax \ignorespaces\fi} {\unskip\hspace\runitemsep\ignorespacesafterend} \newenvironment{runenumerate}{% \ifnum \@enumdepth >\thr@@\@toodeep\else \advance\@enumdepth\@ne \edef\@enumctr{enum\romannumeral\the\@enumdepth}% \usecounter{\@enumctr}% \def\@itemlabel{\csname label\@enumctr \endcsname}% \let\@item\run@item \let\par\@empty \ignorespaces\fi} {\unskip\hspace\runitemsep\ignorespacesafterend} \def\run@item[#1]{% \ifhmode\unskip\hspace\runitemsep\else\leavevmode\fi \if@noitemarg \@noitemargfalse \if@nmbrlist\refstepcounter{\@listctr}\fi \fi \mbox{#1}\kern\labelsep\ignorespaces} \newlength\shortitemwidth \setlength\shortitemwidth{65pt} \newenvironment{shortitemize}[1][\hbox to \shortitemwidth{\hfil}]{% \ifnum \@itemdepth >\thr@@\@toodeep\let\endsh@rtitem\relax\else \ifx\item\sh@rtitem\sh@rtnesterr\let\endsh@rtitem\relax\else \advance\@itemdepth\@ne \edef\@itemitem{labelitem\romannumeral\the\@itemdepth}% \settowidth\shortitemwidth{#1}% \list{}{\addtolength\leftmargin\itemindent \addtolength\leftmargin{-\labelwidth}% \addtolength\leftmargin{-\labelsep}% \setlength\itemindent\z@}% \item\relax \@rightskip\@flushglue \rightskip\@rightskip \let\endsh@rtitem\noindent \let\item\sh@rtitem \def\@itemlabel{\csname\@itemitem\endcsname}% \fi\fi\ignorespaces}% {\endsh@rtitem\endlist} \newenvironment{shortenumerate}[1][\hbox to \shortitemwidth{\hfil}]{% \ifnum \@enumdepth >\thr@@\@toodeep\let\endsh@rtitem\relax\else \ifx\item\sh@rtitem\sh@rtnesterr\let\endsh@rtitem\relax\else \advance\@enumdepth\@ne \edef\@enumctr{enum\romannumeral\the\@enumdepth}% \settowidth\shortitemwidth{#1}% \list{}{\addtolength\leftmargin\itemindent \addtolength\leftmargin{-\labelwidth}% \addtolength\leftmargin{-\labelsep}% \setlength\itemindent\z@}% \item\relax \@rightskip\@flushglue \rightskip\@rightskip \let\endsh@rtitem\noindent \let\item\sh@rtitem \usecounter{\@enumctr}% \def\@itemlabel{\csname label\@enumctr \endcsname}% \fi\fi\ignorespaces}% {\endsh@rtitem\endlist} \ifx\TX@ftn\undefined \newtoks\TX@ftn \long\def\TX@ftntext#1{% \edef\@tempa{\the\TX@ftn\noexpand\footnotetext [\the\csname c@\@mpfn\endcsname]}% \global\TX@ftn\expandafter{\@tempa{#1}}}% \long\def\TX@xftntext[#1]#2{% \global\TX@ftn\expandafter{\the\TX@ftn\footnotetext[#1]{#2}}} \fi \def\sh@rtitem{% \endsh@rtitem \@inmatherr\item \@ifnextchar [\sh@rt@item{\@noitemargtrue \sh@rt@item[\@itemlabel]}} \def\sh@rt@item[#1]{% \def\endsh@rtitem{\endlrbox\endgroup% \setlength\@tempdima{\wd\@tempboxa}% \addtolength\@tempdima\labelsep \setlength\@tempdimb\shortitemwidth \addtolength\@tempdimb{2\labelsep}% \addtolength\@tempdimb{\labelwidth}% \addtolength\@tempdima{-1sp}% subtract a Very Small Length \divide\@tempdima by \@tempdimb% \addtolength\@tempdima{1sp}% add one \multiply\@tempdimb by \@tempdima% \addtolength\@tempdimb{-\wd\@tempboxa}% \usebox\@tempboxa \global\TX@ftn\expandafter{\expandafter}\the\TX@ftn \hspace\@tempdimb}% \if@noitemarg \@noitemargfalse \if@nmbrlist\refstepcounter{\@listctr}\fi \fi \settowidth\@tempdima{#1}% \ifdim\@tempdima>\labelwidth\PackageWarning{shortlst}% {label too wide (set \string\labelwidth\space to at least \the\@tempdima)}% \fi \begingroup\lrbox{\@tempboxa}% \let\@footnotetext\TX@ftntext\let\@xfootnotenext\TX@xftntext \makebox[\labelwidth][r]{#1}% \hspace{\labelsep}\ignorespaces} \def\sh@rtnesterr{\relax} % {\PackageError{shortlst} % {nested short-lists, don't nest short-list environments within each other}}