No indentation after macro

No indentation after macro

["H. Özoguz"]

I have defined the following macro:

\def\Qur[#1][#2][#3][#4]{\placeongrid{\blank[4pt]\testpage[4]
\setupindenting[no] 
\startalignment[right]\setupalign[r2l]\setupinterlinespace[line=3.7ex]\amiri 
#1 \stopalignment
\blank[4pt]
     {\bf #2} \wordright{\tfx (Heiliger Qur'an #3:#4)}
     \blank[3pt]}
     }

How can I setup, that paragraphs after this above block will not be 
indented?

Thanks!
Huseyin
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Re: No indentation after macro

[Wolfgang Schuster]

Am 24.07.2013 um 12:23 schrieb H. Özoguz <h.oezoguz@mmnetz.de>:

> I have defined the following macro:
> 
> \def\Qur[#1][#2][#3][#4]{\placeongrid{\blank[4pt]\testpage[4]
> \setupindenting[no] \startalignment[right]\setupalign[r2l]\setupinterlinespace[line=3.7ex]\amiri #1 \stopalignment
> \blank[4pt]
>    {\bf #2} \wordright{\tfx (Heiliger Qur'an #3:#4)}
>    \blank[3pt]}
>    }
> 
> How can I setup, that paragraphs after this above block will not be indented?

You can add \noindentation at the end of your code. You can also use the annotation
environment to create a new command for your text where you can set text with keys.

\usemodule[annotation]

\defineannotation
  [Qur]
  [alternative=Qur,
   spacebefore=3pt,
   paragraph=yes,
   align=r2l,
  %before={\testpage[4]},
   indentnext=no,
  %style=amari,
   interlinespace=3.7ex]

\defineannotationalternative[Qur][renderingsetup=annotation:Qur,alternative=vertical]

\startsetups[annotation:Qur]

  \currentannotationcontent

  \blank[4pt]

  {\bf\annotationparameter{one}}\wordright{\tfx (Heiliger Qur'an \annotationparameter{two}:\annotationparameter{three})}

\stopsetups

\setupindenting[yes,medium]

\starttext

\input knuth

\startQur[one=A,two=B,three=C]
\input knuth
\stopQur

\input knuth

\stoptext

Wolfgang
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________