Am 19.10.2012 um 11:30 schrieb Alan BRASLAU <alan.bras...@cea.fr>:
> Minimal example:
>
> \starttext
> \input tufte
> \startfootnote
> \input ward
> \stopfootnote
> \stoptext
Replace in strc-not.mkvi for the following block the named arguments with
numbered arguments.
This doesn’t work
\unexpanded\def\strc_notations_start#tag#stoptag%
{\begingroup
\edef\currentnote{#tag}%
\strc_constructions_initialize{#tag}%
\strc_notes_synchronize
\ifnotesenabled
\strc_counters_increment_sub\currentconstructionnumber\currentconstructionlevel
\fi
\normalexpanded % not that efficient but also not that frequently used
{\def\noexpand\strc_pickup_yes[##1]##2\csname\e!stop#stoptag\endcsname{\strc_notations_command_yes[##1]{##2}}%
\def\noexpand\strc_pickup_nop
##1\csname\e!stop#stoptag\endcsname{\strc_notations_command_nop {##1}}}%
\doifnextoptionalelse\strc_pickup_yes\strc_pickup_nop}
but this does
\unexpanded\def\strc_notations_start#1#2%
{\begingroup
\edef\currentnote{#1}%
\strc_constructions_initialize{#1}%
\strc_notes_synchronize
\ifnotesenabled
\strc_counters_increment_sub\currentconstructionnumber\currentconstructionlevel
\fi
\normalexpanded % not that efficient but also not that frequently used
{\def\noexpand\strc_pickup_yes[##1]##2\csname\e!stop#2\endcsname{\strc_notations_command_yes[##1]{##2}}%
\def\noexpand\strc_pickup_nop
##1\csname\e!stop#2\endcsname{\strc_notations_command_nop {##1}}}%
\doifnextoptionalelse\strc_pickup_yes\strc_pickup_nop}
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
___________________________________________________________________________________
