From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.comp.tex.context/167
Path: main.gmane.org!not-for-mail
From: Hans Hagen <pragma@wxs.nl>
Newsgroups: gmane.comp.tex.context
Subject: Re: \paragraph should give warning when \startkantlijn active
Date: Fri, 09 Oct 1998 14:09:23 +0100
Sender: owner-ntg-context@let.uu.nl
Message-ID: <361E0B03.72A0333C@wxs.nl>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Trace: main.gmane.org 1035391037 21756 80.91.224.250 (23 Oct 2002 16:37:17 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Wed, 23 Oct 2002 16:37:17 +0000 (UTC)
Cc: "'ntg-context@ntg.nl'" <ntg-context@ntg.nl>
Original-To: Berend de Boer <berend@pobox.com>
Xref: main.gmane.org gmane.comp.tex.context:167
X-Report-Spam: http://spam.gmane.org/gmane.comp.tex.context:167

Berend de Boer wrote:

> I'm using \startkantlijn a lot, but frequently I forget or delete a
> stopkantlijn. TeX gives the following error:

Ah, the trick margin rules. Maybe you should use text annotations
(\startcomment text \stopcomment in interactive mode}. You can color
them, and they automatically stack in the margin of the next paragraph.
See 1998-001.pdf .  

> Searching through large documents (with many subdocuments is time
> consuming). Can \paragraph not give an error when a \startkantlijn is
> active? A \startkantlijn cannot go across different paragraphs anyway (at
> least it doesn't work, either intentional or not).

\def\setupmarginrules%
  {\dodoubleargument\getparameters[\??ka]}

\definecomplexorsimple\startmarginrule

\def\simplestartmarginrule%
  {\bgroup
   \let\drawmarginrule=\relax
   \let\stopmarginrule=\dostopmarginrule
   \beginofshapebox}

\def\complexstartmarginrule[#1]%
  {\bgroup
   \let\drawmarginrule=\relax
   \ifnum#1<\@@kaniveau\relax
     \let\stopmarginrule=\egroup
   \else
     \def\@@kadefaultwidth{#1}%
     \let\stopmarginrule=\dostopmarginrule
     \expandafter\beginofshapebox
   \fi}

\def\dostopmarginrule%
  {\endofshapebox
   \reshapebox
     {\hbox{\inlinkermarge{\dodrawmarginrule}\box\shapebox}}%
   \flushshapebox
   \egroup}

This comes from core-rul.tex and works with multiple paragraphs, and as
far as I can test does not generate the message when a \stop.. is
missing. 

This mechanism does not work well with e.g. opsommingen, ifonly because
tex does not offer hooks to unroll boxes etc etc savely (interfering
whatsits and so on).   

Hans

-----------------------------------------------------------------
                                          Hans Hagen | PRAGMA ADE
              Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
    tel: 038 477 53 69 | fax: 038 477 53 74 | mail: pragma@wxs.nl
-----------------------------------------------------------------