csquotes からの引用符でカスタム引用環境を囲みます

csquotes からの引用符でカスタム引用環境を囲みます

私は次のaquote環境を使用して、引用文の右下に著者名も配置する引用文を作成しています (beamer 内)。このマクロを使用するのは、前の行にスペースがある場合に著者名をそのスペースに「押し込む」ことができるためです。

私の LaTeX スキルは限られています。この環境を再定義して、引用内のテキストも \enquote{} することは可能でしょうか? やり方がわからず困っています。

\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}

私が使用しているこのマクロは、このサイトの記事用に投稿されたオリジナルのマクロに基づいていますが、beamer で動作するように若干カスタマイズされています。このサイトでオリジナルの例が見つかった場合は、以下にリンクします。

ここに画像の説明を入力してください

答え1

フォントに応じて調整する必要があるかもしれない解決策を次に示します ( \hspace)。

引用例

\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}

関連情報