ntg-context - mailing list for ConTeXt users
 help / color / mirror / Atom feed
From: Marcin Borkowski <mbork@wmi.amu.edu.pl>
To: ntg-context@ntg.nl
Subject: Re: Indenting in \setuplines
Date: Thu, 6 Jun 2013 10:58:49 +0200	[thread overview]
Message-ID: <20130606105849.1c50b4dc@aga-netbook> (raw)
In-Reply-To: <51B03F07.7060608@wxs.nl>

Dnia 2013-06-06, o godz. 09:49:27
Hans Hagen <pragma@wxs.nl> napisał(a):

> On 6/6/2013 12:36 AM, Marcin Borkowski wrote:
> 
> > Sorry to say that, but neither seems to work...
> 
> it is hard to say what goes wrong if you only show the error message
> and no real code

Sorry for that, my fault.

Now comes the fun part: I *copied* my code from "my" version of
spac-hor.mkiv to the document, and it started to work then!  Strange.
I attach a MWE.  Hans, is it possible to add something like that to
spac-hor.mkiv?  (This code is not very nice, there's some duplication,
but it's simple and works;).)

%%%%%%%%%%%%%%%%%%%% cut here %%%%%%%%%%%%%%%%%%%%
\unprotect
\installindentingmethod{oddpairs}{\c_spac_indentation_toggle_state\plusthree}
\installindentingmethod{evenpairs}{\c_spac_indentation_toggle_state\plusfour}

\newcount \c_spac_par_modulo_four

\def\spac_indentation_evenpairs_toggle
  {%
   \advance \c_spac_par_modulo_four \plusone
   \ifnum \c_spac_par_modulo_four=4
     \c_spac_par_modulo_four=0
   \fi
   \ifcase \c_spac_par_modulo_four
       \global\indentationtrue
     \or
       \global\indentationfalse  \spac_indentation_remove
     \or
       \global\indentationfalse  \spac_indentation_remove
     \or
       \global\indentationtrue
   \fi 
  }

\def\spac_indentation_oddpairs_toggle
  {%
   \advance \c_spac_par_modulo_four \plusone
   \ifnum \c_spac_par_modulo_four=4
     \c_spac_par_modulo_four=0
   \fi
   \ifcase \c_spac_par_modulo_four
       \global\indentationfalse  \spac_indentation_remove
     \or
       \global\indentationtrue
     \or
       \global\indentationtrue
     \or
       \global\indentationfalse  \spac_indentation_remove
   \fi 
  }

\def\spac_indentation_check_toggle
  {\ifcase\c_spac_indentation_toggle_state
     % nothing
   \or    % odd
     \spac_indentation_no_toggle
   \or    % even
     \spac_indentation_do_toggle
   \or    % oddpairs
     \global\let\checkindentation\spac_indentation_oddpairs_toggle
   \or    % evenpairs
     \global\let\checkindentation\spac_indentation_evenpairs_toggle
   \fi}

\protect

\setupindenting[yes,1em]
\starttext

\startlines[indenting=evenpairs]
Lorem ipsum
dolor sit amet,
consectetuer adipiscing elit.
Ut purus elit,
vestibulum ut,
placerat ac, adipiscing vitae, felis.
Curabitur dictum gravida mauris.
Nam arcu libero, nonummy eget,
consectetuer id, vulputate a, magna.
Donec vehicula augue eu neque.
\stoplines

\stoptext
%%%%%%%%%%%%%%%%%%%% cut here %%%%%%%%%%%%%%%%%%%%

> Hans

Best,

-- 
Marcin Borkowski
http://octd.wmi.amu.edu.pl/en/Marcin_Borkowski
Adam Mickiewicz University
___________________________________________________________________________________
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
___________________________________________________________________________________

      reply	other threads:[~2013-06-06  8:58 UTC|newest]

Thread overview: 6+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2013-06-03 13:20 Marcin Borkowski
2013-06-05 21:06 ` Marcin Borkowski
2013-06-05 22:22   ` Hans Hagen
2013-06-05 22:36     ` Marcin Borkowski
2013-06-06  7:49       ` Hans Hagen
2013-06-06  8:58         ` Marcin Borkowski [this message]

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=20130606105849.1c50b4dc@aga-netbook \
    --to=mbork@wmi.amu.edu.pl \
    --cc=ntg-context@ntg.nl \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).