Re: [NTG-context] Pull quotes

28 Apr 2011

      Am 28.04.2011 um 18:27 schrieb mathew:
...
On Wed, Apr 27, 2011 at 15:08, Pontus Lurcock  wrote:
...
Why not just put it in a float?
OK, after some fiddling around, a combination of a framed text in a
float seems to work.
Definitions:
\definefloat[pullquote][pullquotes] % Define a new type of float
\setupcaption[pullquote][location=none] % Set it to have no captions
\defineframedtext[pullquote][frame=off] % Define a new type of framed
text with no visible frame
Usage:
\placepullquote[right]{}{
\startpullquote[width=4cm]
\tfc “All work and no play makes Jack a dull boy.”
\stoppullquote}
The {} in the \placepullquote is the text for the caption, which in
this case is set up to be invisible. Obviously you could use the
caption feature to cite the source of quotations.
As do now know what you want here is a solution from me (MkIV only):

\usemodule[annotation]

\define[2]\PullquoteCommand
  {\placefigure[\annotationparameter{location},none]{}%
     {\framedtext
        [frame=off,
         width=\annotationparameter{width},
         style=\annotationparameter{style}]
%       {“#2”}}}
        {\setupinterlinespace“#2”\par}}}

\defineannotation
  [pullquote]
  [alternative=command,
       command=\PullquoteCommand,
      location=right,
         width=fit,
         style=\tfc]

\starttext

\startpullquote[width=4cm]
All work and no play makes Jack a dull boy.
\stoppullquote

\input knuth

\blank

\startpullquote[width=4cm,location=left]
All work and no play makes Jack a dull boy.
\stoppullquote

\input knuth

\stoptext

Wolfgang

Re: [NTG-context] Pull quotes

Wolfgang Schuster