summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/anch-bar.mkiv
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2017-05-14 19:58:50 +0200
committerContext Git Mirror Bot <phg42.2a@gmail.com>2017-05-14 19:58:50 +0200
commitfd0c4577a4b6e85ca2db664906e1a03807ce133f (patch)
treefa23fcc04248d03ff82e34634b8ef1bb9cf28acb /tex/context/base/mkiv/anch-bar.mkiv
parentdb581096187dc2d3cbdbe4cdc39d247c168b1607 (diff)
downloadcontext-fd0c4577a4b6e85ca2db664906e1a03807ce133f.tar.gz
2017-05-14 19:15:00
Diffstat (limited to 'tex/context/base/mkiv/anch-bar.mkiv')
-rw-r--r--tex/context/base/mkiv/anch-bar.mkiv10
1 files changed, 5 insertions, 5 deletions
diff --git a/tex/context/base/mkiv/anch-bar.mkiv b/tex/context/base/mkiv/anch-bar.mkiv
index b5df21a07..f8581da32 100644
--- a/tex/context/base/mkiv/anch-bar.mkiv
+++ b/tex/context/base/mkiv/anch-bar.mkiv
@@ -15,8 +15,10 @@
\unprotect
-%D We will implement a sidebar mechanism using the
-%D functionality from \type {core-pos}.
+%D This can be done better now ...
+
+%D We will implement a sidebar mechanism using the functionality from
+%D \type {core-pos}.
%D
%D \starttyping
%D \definesidebar[whow][rulecolor=green,distance=0pt]
@@ -96,10 +98,10 @@
{\def\currentsidebar{#1}%
\setupcurrentsidebar[#2]}%
\scratchdistance\sidebarparameter\c!distance\relax
+ \scratchdimen\sidebarparameter\c!leftmargindistance\relax
\edef\m_level{\sidebarparameter\c!level}%
\ifx\m_level\empty
\ifnum\c_anch_sidebars_level=\plusone
- \scratchdimen\sidebarparameter\c!leftmargindistance\relax
\ifdim\scratchdimen=\zeropoint
\advance\d_anch_sidebars_distance\scratchdistance\relax
\else
@@ -110,7 +112,6 @@
\fi
\else
\ifnum\m_level=\plusone
- \scratchdimen\sidebarparameter\c!leftmargindistance\relax
\ifdim\scratchdimen=\zeropoint
\advance\d_anch_sidebars_distance\scratchdistance\relax
\else
@@ -147,7 +148,6 @@
\startMPpositionmethod{mpos:sidebar}
\startMPpositiongraphic{mpos:sidebar}{linecolor,linewidth,distance,alternative}%
- if unknown context_apos : input mp-apos.mpiv ; fi ;
anch_sidebars_draw (
\MPp\MPbself,\MPp\MPeself,\MPy\MPbself,\MPy\MPeself,\MPh\MPbself,\MPd\MPeself,
\MPx{\textanchor},\MPy{\textanchor},\MPw{\textanchor},\MPh{\textanchor},