Coloque um ambiente de cotação personalizado entre aspas de csquotes

Coloque um ambiente de cotação personalizado entre aspas de csquotes

Estou usando o seguinte aquoteambiente para criar citações que também colocam o nome do autor no canto inferior direito da citação (no beamer). Esta macro é usada porque o nome do autor pode ser 'comprimido' no espaço da linha anterior, se houver.

Minhas habilidades em látex são limitadas. É possível redefinir este ambiente para também \enquote{} o texto dentro da citação? Estou tendo problemas para descobrir como fazer isso.

\documentclass{beamer}

\usepackage[style=british]{csquotes}

\def\signed #1{{\leavevmode\unskip\nobreak\hfil\penalty50\hskip1em
  \hbox{}\nobreak\hfill #1%
  \parfillskip=0pt \finalhyphendemerits=0 \endgraf}}

\newsavebox\mybox
\newenvironment{aquote}[1]
  {\savebox\mybox{#1}\begin{quote}}
  {\vspace*{1mm}\signed{\usebox\mybox}\end{quote}}

\begin{document}

\begin{frame}
      Example:
      \begin{aquote}{Author Name}
      This is an example with some text that goes across more than one line.    
      \end{aquote}

\end{frame}

\end{document}

Esta macro que estou usando é baseada em uma original postada neste site para artigos, mas foi ligeiramente customizada para funcionar com o beamer. Se eu conseguir encontrar o exemplo original neste site, colocarei um link abaixo.

insira a descrição da imagem aqui

Responder1

Aqui está uma solução que você talvez precise ajustar de acordo com suas fontes (as \hspace).

citação de exemplo

\documentclass{beamer}

\usepackage[style=british]{csquotes}

\def\signed #1{{\leavevmode\unskip\nobreak\hfil\penalty50\hskip1em
  \hbox{}\nobreak\hfill #1%
  \parfillskip=0pt \finalhyphendemerits=0 \endgraf}}

\newsavebox\mybox
\newenvironment{aquote}[1]
  {\savebox\mybox{#1}\begin{quote}\openautoquote\hspace*{-.7ex}}
  {\unskip\closeautoquote\vspace*{1mm}\signed{\usebox\mybox}\end{quote}}

\begin{document}

\begin{frame}
      Example:
      \begin{aquote}{Author Name}
      This is an example with some text that goes across more than one line.    
      \end{aquote}

\end{frame}

\end{document}

informação relacionada