diff options
author | Hans Hagen <pragma@wxs.nl> | 2013-04-16 12:08:00 +0200 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2013-04-16 12:08:00 +0200 |
commit | bc18e41199a3772d300a4fa68bd86402e23f4f7a (patch) | |
tree | f1ab9133705e4cc5157170cd4a66b6a7abcab474 /tex/context/base/strc-con.mkvi | |
parent | 18bb8026f624a646df0951b69f7d2dd718ca199c (diff) | |
download | context-bc18e41199a3772d300a4fa68bd86402e23f4f7a.tar.gz |
beta 2013.04.16 12:08
Diffstat (limited to 'tex/context/base/strc-con.mkvi')
-rw-r--r-- | tex/context/base/strc-con.mkvi | 15 |
1 files changed, 13 insertions, 2 deletions
diff --git a/tex/context/base/strc-con.mkvi b/tex/context/base/strc-con.mkvi index 0f5b202b9..11cd31983 100644 --- a/tex/context/base/strc-con.mkvi +++ b/tex/context/base/strc-con.mkvi @@ -105,6 +105,8 @@ \let\currentconstructionlevel \empty \let\currentconstructionhandler\empty +\settrue\c_strc_constructions_define_commands % use with care, might become a proper key + \appendtoks \ifx\currentconstructionparent\empty \letvalue{\??constructionmain\currentconstruction}\currentconstruction @@ -118,8 +120,10 @@ \to \everydefineconstruction \appendtoks - \setuevalue{\e!start\currentconstruction}{\strc_constructions_start{\currentconstruction}}% - \setuevalue{\e!stop \currentconstruction}{\strc_constructions_stop}% + \ifconditional\c_strc_constructions_define_commands + \setuevalue{\e!start\currentconstruction}{\strc_constructions_start{\currentconstruction}}% + \setuevalue{\e!stop \currentconstruction}{\strc_constructions_stop}% + \fi \to \everydefineconstruction %D Just a basic environment (mostly for testing). We will provide a 'setup' based @@ -961,4 +965,11 @@ \installstructurelistprocessor{construction}{\usestructurelistprocessor{number+title}} +% Helpers: + +\def\currentconstructionnumber{\constructionparameter\s!counter} + +\unexpanded\def\strc_constructions_next_indeed #get#tag#level{\strc_counters_increment_sub{#get{#tag}\s!counter}{#level}} +\unexpanded\def\strc_constructions_reset_indeed#get#tag#level{\strc_counters_reset_sub {#get{#tag}\s!counter}{#level}} + \protect \endinput |