Re: [NTG-context] \hangindent and R2L alignment

23 Sep 2015


      On 9/23/2015 10:15 PM, Wolfgang Schuster wrote:
...
Hi,
there was a question on the Stackexchange site [*] with a problem
for the \starthanging environment when the alignment is R2L.
\def\spac_hanging_finish
   {\scratchdistance\directhangingparameter\c!distance\relax
    \ifdim\ht\nextbox>\strutht
      \setbox\nextbox\tbox{\box\nextbox}%
    \fi
    \scratchcounter\directhangingparameter\c!n\relax
    \ifnum\scratchcounter>\zerocount
      \hangafter-\scratchcounter
    \else
      \getboxheight\scratchdimen\of\box\nextbox
      \getnoflines\scratchdimen
      \hangafter-\noflines
    \fi
    \ht\nextbox\strutht
    \dp\nextbox\strutdp
    \scratchwidth\dimexpr\wd\nextbox+\scratchdistance\relax
    \ifx\m_spac_hanging_location\v!right
      \hangindent\ifconditional\displaylefttoright-\fi\scratchwidth
      \rlap{\hskip\dimexpr\hsize-\wd\nextbox\relax\box\nextbox}%
    \else
      \hangindent\ifconditional\displaylefttoright\else-\fi\scratchwidth
      \llap{\box\nextbox\hskip\scratchdistance}%
    \fi
    \ignorespaces}

(maybe the content of the hang blob will becoem l2r)
...
Here is shortened version of the example:
%%%% begin example
\useMPlibrary[dum]
\starttext
\starthanging[location=left]{\externalfigure[dummy][width=4cm,height=3\lineheight]}
\input tufte
\stophanging
\blank
\startalignment[righttoleft]
\starthanging[location=left]{\externalfigure[dummy][width=4cm,height=3\lineheight]}
\input tufte
     \stophanging
\stopalignment
\stoptext
%%%% end example
The problem is that \hangindent behaves the same for L2R and R2L
alignment unlike
the other formatting commands (\hangindent or \leftskip) for paragraphs.
%%%% begin example
\showframe[text][text]
\setuphead
   [subject]
   [align=lefttoright,
    indentnext=yes]
\starttext
\startbuffer
\subject{Normal paragraph}
\input ward
\subject{Leftskip}
\start
     \leftskip 4em
     \input ward\par
\stop
\subject{Parindent}
\start
\parindent 4em
     \input ward\par
\stop
\subject{Hangindent}
\start
     \hangindent 4em
     \hangafter -2
     \input ward\par
\stop
\stopbuffer
\title{Left to right}
\startalignment[lefttoright]
\getbuffer
\stopalignment
\title{Right to left}
\startalignment[righttoleft]
\getbuffer
\stopalignment
\stoptext
%%%% end example
[*]
http://tex.stackexchange.com/questions/268688/correct-inconsistent-image-pla...
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
___________________________________________________________________________________
-- 

-----------------------------------------------------------------
                                           Hans Hagen | PRAGMA ADE
               Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
     tel: 038 477 53 69 | voip: 087 875 68 74 | www.pragma-ade.com
                                              | www.pragma-pod.nl
-----------------------------------------------------------------