progress on quotation environment

beamerthemelines.sty

@@ -544,7 +544,75 @@
 
 %%%%% verse, quotation, quote:
 
+
+% \begin{tikzpicture}
+%   \useasboundingbox (0,0) rectangle (5,5);
+%   \node at (2,2) {Foo};
+% \end{tikzpicture}
+
+% font selection
+% https://tex.stackexchange.com/questions/25249/how-do-i-use-a-particular-font-for-a-small-section-of-text-in-my-document
+% pbk , phv, pnc, qbk, qhv, qcs
+\newcommand*\openquote{\makebox(25,-22){\scalebox{5}{\fontfamily{pbk}\selectfont ``}}}
+
+\defbeamertemplate{quotation symbol}{default}{}
+\defbeamertemplate{quotation symbol}{quotes}{\textquotedblleft}
+\defbeamertemplate{quotation symbol}{bigquotes}{\openquote}
+
+\setbeamertemplate{quotation symbol}[bigquotes]
+
+\defbeamertemplate{quotation author separator}{default}{}
+\defbeamertemplate{quotation author separator}{dash}{ --- }
+
+\setbeamertemplate{quotation author separator}[dash]
+
+\newcommand{\quote@author@left}[1]{%
+  \item[%
+    \usebeamerfont{#1 author}%
+    \usebeamercolor{#1 author}%
+    \usebeamertemplate{#1 author separator}%
+    \insertquoteauthor]}
+\newcommand{\quote@author@right}[1]{%
+  \par{}\hfill%
+  \usebeamerfont{#1 author}%
+  \usebeamercolor{#1 author}%
+  \usebeamertemplate{#1 author separator}%
+  \insertquoteauthor}
+\newcommand{\quote@author@rightline}[1]{%
+  \hfill%
+  \usebeamerfont{#1 author}%
+  \usebeamercolor{#1 author}%
+  \usebeamertemplate{#1 author separator}%
+  \insertquoteauthor}
+
+\defbeamertemplate{quotation author}{left}{\quote@author@left{quotation}}
+\defbeamertemplate{quotation author}{right}{\quote@author@right{quotation}}
+\defbeamertemplate{quotation author}{rightline}{\quote@author@rightline{quotation}}
+
+\setbeamertemplate{quotation author}[rightline]
+
 % see definition in /usr/share/texmf/tex/latex/beamer/base/beamerbaselocalstructure.sty 
+\renewenvironment<>{quotation}[1][]
+{ \def\insertquoteauthor{#1}
+  \actionenv#2%
+  \usebeamertemplate{quotation begin}
+  \usebeamerfont{quotation}%
+  \usebeamercolor{quotation}%
+  \list{\usebeamertemplate{quotation symbol}}{
+    %\listparindent 1.5em%
+    %\itemindent    \listparindent
+    \rightmargin   \leftmargin
+    \parsep        \z@ \@plus\p@
+  }%
+  \item\strut\relax
+}
+{\usebeamertemplate{quotation author}\endlist\usebeamertemplate{quotation end}\endactionenv}
+
+%\defbeamertemplate*{quotation begin}{default}
+%{\beamercolorbox[vmode]{quotation}}
+
+%\defbeamertemplate*{quotation end}{default}
+%{\endbeamercolorbox}
 
 
 %%%%% title page %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

lines-example.tex

@@ -354,10 +354,13 @@
     A \verb!verse! environment.\\With a second line.
   \end{verse}
   \vfill
-  Quote something of somebody:
+  Quote something of somebody with indentation:
-  \begin{quotation}
+  \begin{quotation}[Me]
-    %{\Huge\bf ''}
+    A \verb!quotation! environment. There is a lot to talk about and
-    A \verb!quotation! environment.\\With a second line.
+    it really takes a lot of words to express this. Most likely this
+    does not fit into a single line.
+    
+    Here we even start a second paragraph.
   \end{quotation}
   \vfill
   Quote something else of somebody else: