summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/base/mkiv/strc-sec.mkiv
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2016-04-27 21:54:13 +0000
committerKarl Berry <karl@freefriends.org>2016-04-27 21:54:13 +0000
commit4ca0e50699e2f4fc4dbe8b1dc4fe528a51b5429d (patch)
tree15c515e279a70c47939a7451b70ebfec6bbcb579 /Master/texmf-dist/tex/context/base/mkiv/strc-sec.mkiv
parent92b16675f5d3c1e9819112e099165b4dbc5f8a52 (diff)
context (27apr16)
git-svn-id: svn://tug.org/texlive/trunk@40787 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/context/base/mkiv/strc-sec.mkiv')
-rw-r--r--Master/texmf-dist/tex/context/base/mkiv/strc-sec.mkiv26
1 files changed, 13 insertions, 13 deletions
diff --git a/Master/texmf-dist/tex/context/base/mkiv/strc-sec.mkiv b/Master/texmf-dist/tex/context/base/mkiv/strc-sec.mkiv
index c78cffbffaf..657e6c86644 100644
--- a/Master/texmf-dist/tex/context/base/mkiv/strc-sec.mkiv
+++ b/Master/texmf-dist/tex/context/base/mkiv/strc-sec.mkiv
@@ -11,6 +11,9 @@
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.
+%D In retrospect I should have gone futher and move more to the
+%D \LUA\ end but here we are now. Maybe some day.
+
\writestatus{loading}{ConTeXt Structure Macros / Sectioning}
\unprotect
@@ -480,14 +483,8 @@
% todo: add grouping but where: before/after trickery .. probably inside because one can always add
% grouping to the before/after settings
-\unexpanded\def\strc_sectioning_start_named_section[#1]% [#2][#3]
- {\pushmacro\currentnamedsection
- \edef\currentnamedsection{#1}%
- \normalexpanded{\strc_sectioning_start_named_section_indeed[\currentnamedsection]}} % [#2][#3]
-
\unexpanded\def\stopnamedsection
- {\normalexpanded{\strc_sectioning_stop[\currentnamedsection]}%
- \popmacro\currentnamedsection}
+ {\normalexpanded{\strc_sectioning_stop[\currentnamedsection]}}
% structure sections (the parents of chapter etc)
@@ -603,9 +600,9 @@
% head construction
-\unexpanded\def\strc_sectioning_handle_own{\dodoubleempty\strc_sectioning_handle_own_indeed} % [ref] {nr} {title}
-\unexpanded\def\strc_sectioning_handle_nop{\dodoubleempty\strc_sectioning_handle_nop_indeed} % [ref] {title}
-\unexpanded\def\strc_sectioning_start {\dotripleempty\strc_sectioning_start_named_section_indeed} % [settings] [userdata] !!! also used at lua end
+\unexpanded\def\strc_sectioning_handle_own{\dodoubleempty\strc_sectioning_handle_own_indeed} % [ref] {nr} {title}
+\unexpanded\def\strc_sectioning_handle_nop{\dodoubleempty\strc_sectioning_handle_nop_indeed} % [ref] {title}
+\unexpanded\def\strc_sectioning_start {\dotripleempty\strc_sectioning_start_named_section} % [settings] [userdata] !!! also used at lua end
\newconditional\currentstructureown
@@ -628,8 +625,10 @@
\unexpanded\def\strc_sectioning_handle_nop_indeed_nop#1#2#3%
{\strc_sectioning_handle{#1}{\c!reference={#2},\c!title={#3}}{}} % name ref nr title --
-\unexpanded\def\strc_sectioning_start_named_section_indeed[#1][#2][#3]% for the moment no grouping, too annoying with page breaks
- {\setfalse\currentstructureown
+\unexpanded\def\strc_sectioning_start_named_section[#1][#2][#3]% for the moment no grouping, too annoying with page breaks
+ {\pushmacro\currentnamedsection
+ \edef\currentnamedsection{#1}%
+ \setfalse\currentstructureown
%\globalpushmacro\currenthead % this does not work out well
\xdef\currenthead{#1}%
\setsystemmode\currenthead % new, also here now
@@ -647,7 +646,8 @@
\xdef\currenthead{#1}% recover
\headparameter\c!aftersection
\the\everyafterhead
- \resetsystemmode\currenthead} % new, also here now
+ \resetsystemmode\currenthead
+ \popmacro\currentnamedsection} % new, also here now
\let\dostarthead\strc_sectioning_start % used at lua end
\let\dostophead \strc_sectioning_stop % used at lua end