summaryrefslogtreecommitdiff
path: root/tex/context/base/strc-tag.mkiv
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2014-08-29 20:57:00 +0200
committerHans Hagen <pragma@wxs.nl>2014-08-29 20:57:00 +0200
commit54b35840ce8f91454174a2d63042d776222a378b (patch)
tree056763d0a6f291516ac8f7b572a3e234a9b2fde0 /tex/context/base/strc-tag.mkiv
parent2c6477867c9a9e84a1e48134f062ef7706de1499 (diff)
downloadcontext-54b35840ce8f91454174a2d63042d776222a378b.tar.gz
beta 2014.08.29 20:57
Diffstat (limited to 'tex/context/base/strc-tag.mkiv')
-rw-r--r--tex/context/base/strc-tag.mkiv28
1 files changed, 11 insertions, 17 deletions
diff --git a/tex/context/base/strc-tag.mkiv b/tex/context/base/strc-tag.mkiv
index 9b3c2feb9..39dba8259 100644
--- a/tex/context/base/strc-tag.mkiv
+++ b/tex/context/base/strc-tag.mkiv
@@ -63,6 +63,7 @@
\def\t!synonym {synonym} % Span
\def\t!register {register} % Div
+\def\t!registerlocation {registerlocation} % Span
\def\t!registersection {registersection} % Div
\def\t!registertag {registertag} % Span
\def\t!registerentries {registerentries} % Div
@@ -327,7 +328,9 @@
{\dodoubleempty\paragraph_start}
\def\paragraph_start
- {\iffirstargument
+ {\endgraf % we end before the group
+ \begingroup
+ \iffirstargument
\ifsecondargument
\doubleexpandafter\paragraph_start_two
\else
@@ -338,41 +341,32 @@
\fi}
\def\paragraph_start_two[#1][#2]%
- {\endgraf % we end before the group
- \begingroup
- \let\stopparagraph\paragraph_stop_indeed
- \edef\currentparagraph{#1}%
+ {\edef\currentparagraph{#1}%
\setupcurrentparagraph[#2]%
\paragraph_start_indeed}
\def\paragraph_start_one[#1][#2]%
- {\endgraf % we end before the group
- \begingroup
- \let\stopparagraph\paragraph_stop_indeed
- \doifassignmentelse{#1}
+ {\doifassignmentelse{#1}
{\let\currentparagraph\empty
\setupcurrentparagraph[#1]}
{\edef\currentparagraph{#1}}%
\paragraph_start_indeed}
+\def\paragraph_start_zero[#1][#2]%
+ {\let\currentparagraph\empty
+ \paragraph_start_indeed}
+
\def\paragraph_start_indeed
{\useparagraphstyleandcolor\c!style\c!color
\usealignparameter\paragraphparameter
\usesetupsparameter\paragraphparameter
\dostarttagged\t!paragraph\currentparagraph}
-\def\paragraph_start_zero[#1][#2]%
- {\let\currentparagraph\empty
- \paragraph_start_indeed}
-
-\unexpanded\def\paragraph_stop_indeed
+\unexpanded\def\stopparagraph
{\dostoptagged
\endgraf % we end inside the group
\endgroup}
-\unexpanded\def\stopparagraph
- {\dostoptagged}
-
\let\startpar\startparagraph
\let\stoppar \stopparagraph