From 0c75a2acf592eb4360685375904440f5e6b8125a Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Tue, 12 Nov 2019 19:54:50 +0100
Subject: 2019-11-12 18:53:00

---
 tex/context/base/mkiv/strc-ref.mkvi | 14 +-------------
 1 file changed, 1 insertion(+), 13 deletions(-)

(limited to 'tex/context/base/mkiv/strc-ref.mkvi')

diff --git a/tex/context/base/mkiv/strc-ref.mkvi b/tex/context/base/mkiv/strc-ref.mkvi
index cfe8744e2..9fa04c9a6 100644
--- a/tex/context/base/mkiv/strc-ref.mkvi
+++ b/tex/context/base/mkiv/strc-ref.mkvi
@@ -1062,20 +1062,8 @@
 \def\referencerealpage
   {\clf_referencerealpage}
 
-% \unexpanded\def\columnreference#1%
-%   {\dontleavehmode
-%    \hpack to \zeropoint{\hpos{\v!column:#1}{\kern\dimexpr\textwidth/\nofcolumns\relax}\hss}}
-%
-% \def\columnnumber#1%
-%   {\numexpr\dimexpr\MPx{\v!column:#1}\relax/\dimexpr\MPw{\v!column:#1}\relax\relax}
-%
-% but nicer is:
-
 \def\referencecolumnnumber
-  {\numexpr
-     \dimexpr\clf_referenceposx-\cutspace\relax/\dimexpr\makeupwidth/\nofcolumns\relax
-    +\plusone
-   \relax}
+  {\clf_referencecolumn}
 
 \unexpanded\def\tracedpagestate
   {{\blue\tttf(\ifcase\referencepagedetail unknown\or same\or previous\or next\or above\or below\else unknown\fi)}}
-- 
cgit v1.2.3