From 02871b0d86e21ea1537b193d7fbb2d34114eb32a Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 8 Sep 2011 22:44:07 +0000 Subject: quoting (8sep11) git-svn-id: svn://tug.org/texlive/trunk@23875 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/quoting/quoting.sty | 47 +++++++++++++++++-------- 1 file changed, 32 insertions(+), 15 deletions(-) (limited to 'Master/texmf-dist/tex') diff --git a/Master/texmf-dist/tex/latex/quoting/quoting.sty b/Master/texmf-dist/tex/latex/quoting/quoting.sty index 15066be7d1d..4d177b91d41 100644 --- a/Master/texmf-dist/tex/latex/quoting/quoting.sty +++ b/Master/texmf-dist/tex/latex/quoting/quoting.sty @@ -19,9 +19,20 @@ %% \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{quoting} - [2011/08/08 v0.1 Consolidated environment for displayed text] + [2011/09/08 v0.1a Consolidated environment for displayed text] \RequirePackage{etoolbox,kvoptions} \SetupKeyvalOptions{family=quo,prefix=quo@} +\def\quo@in@false{\def\quo@indentfirsttype{0}} +\def\quo@in@true{\def\quo@indentfirsttype{1}} +\def\quo@in@auto{\def\quo@indentfirsttype{2}} +\define@key{quo}{indentfirst}{% + \ifcsname quo@in@#1\endcsname + \csname quo@in@#1\expandafter\endcsname + \else + \PackageError{quoting}{Unknown value #1 for option indentfirst}% + \fi +} +\setkeys{quo}{indentfirst=auto} \newcommand*{\quotingfont}{} \define@key{quo}{font}{% \def\quotingfont{\csname #1\endcsname}% @@ -78,25 +89,31 @@ \setlength{\topsep}{\quo@vskip}% \setlength{\partopsep}{\z@}% }% - \setlength{\itemindent}{% - \ifbool{vmode}{% - \ifbool{quo@afterquo}{% - \z@ - }{% - \ifbool{@nobreak}{% - \ifbool{@afterindent}{% - \parindent + \ifcase\quo@indentfirsttype\relax + \setlength{\itemindent}{\z@}% + \or + \setlength{\itemindent}{\parindent}% + \or + \setlength{\itemindent}{% + \ifbool{vmode}{% + \ifbool{quo@afterquo}{% + \z@ + }{% + \ifbool{@nobreak}{% + \ifbool{@afterindent}{% + \parindent + }{% + \z@ + }% }{% - \z@ + \parindent }% - }{% - \parindent }% + }{% + \z@ }% - }{% - \z@ }% - }% + \fi \setlength{\leftmargin}{\quo@leftmargin}% \setlength{\rightmargin}{\quo@rightmargin}% \setlength{\listparindent}{\parindent}% -- cgit v1.2.3