quotchap (9jul19)

git-svn-id: svn://tug.org/texlive/trunk@51591 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 5 insertions, 3 deletions

diff --git a/Master/texmf-dist/tex/latex/quotchap/quotchap.sty b/Master/texmf-dist/tex/latex/quotchap/quotchap.sty
index fa74d805f11..93c7e2ffce2 100644
--- a/Master/texmf-dist/tex/latex/quotchap/quotchap.sty
+++ b/Master/texmf-dist/tex/latex/quotchap/quotchap.sty
@@ -40,7 +40,7 @@
 %%%%%%%%%%%%%%%
 \NeedsTeXFormat{LaTeX2e}[1996/12/01]
 \ProvidesPackage{quotchap}
-  [2012/10/20 v1.1 Decorative Chapter Headings with Quotes]
+  [2019/07/09 v1.2 Decorative Chapter Headings with Quotes]
 \newif\if@usecolor\@usecolortrue
 \DeclareOption{grey}{\@usecolortrue}
 \DeclareOption{nogrey}{\@usecolorfalse}
@@ -91,10 +91,12 @@
   \providecommand*{\chapterheadstartvskip}{\vspace*{2.3\baselineskip}}
   \providecommand*{\chapterheadendvskip}{\vspace{1.7\baselineskip}}
   \providecommand*{\sectfont}{\relax}
+  \providecommand*{\quotefont}{\slshape}
+  \providecommand*{\qauthorfont}{\upshape}
   \@ifundefined{@mainmattertrue}{\newif\if@mainmatter\@mainmattertrue}{}}
 \newenvironment{savequote}[1][10cm]{%
   \begin{lrbox}{\@quotebox}
-    \begin{minipage}[t]{#1}\footnotesize\slshape
+    \begin{minipage}[t]{#1}\footnotesize\quotefont
       \ignorespaces}{%
       \unskip\end{minipage}\end{lrbox}
   \global\setbox\@quotebox\copy\@quotebox
@@ -102,7 +104,7 @@
   \ignorespacesafterend}
 \newcommand{\qauthor}[1]{%
   \par\smallskip
-  {\raggedleft\upshape #1\qquad\hbox{}\par}\bigskip}
+  {\raggedleft\qauthorfont #1\qquad\hbox{}\par}\bigskip}
 \newcommand{\qsetcnfont}[1]{%
     \renewcommand*{\@defaultcnfont}{#1}}
 \newsavebox{\@quotebox}