From 344364dee440fb66701665e8389445755c7d00f2 Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Sat, 22 Apr 2006 10:41:00 +0200
Subject: stable 2006.04.22 10:41

---
 tex/context/base/meta-pag.tex | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

(limited to 'tex/context/base/meta-pag.tex')

diff --git a/tex/context/base/meta-pag.tex b/tex/context/base/meta-pag.tex
index 32473cb74..8b266add8 100644
--- a/tex/context/base/meta-pag.tex
+++ b/tex/context/base/meta-pag.tex
@@ -181,6 +181,27 @@
      \hbox{#1}%
    \fi}
 
+% better, so that we can force a key and share with e.g. renumbering
+%
+% \let\namedtextarea\empty
+%
+% \def\registerMPlocaltextarea#1%
+%   {\ifpositioning
+%      \bgroup
+%      \ifx\namedtextarea\empty
+%        \doglobal\increment\currentMPtextareadata
+%        \edef\namedtextarea{gbd:\currentMPtextareadata}%
+%      \fi
+%      \hpos\namedtextarea{\iftracetextareas\boxrulewidth3pt\ruledhbox\fi{#1}}%
+%      \edef\ascii{RegisterLocalTextArea(%
+%        \MPx\namedtextarea,\MPy\namedtextarea,%
+%        \MPw\namedtextarea,\MPh\namedtextarea,\MPd\namedtextarea);}%
+%      \global\MPlocaltextareadata\@EA{\ascii}%
+%      \egroup
+%    \else
+%      \hbox{#1}%
+%    \fi}
+
 \def\resetMPlocaltextarea
   {\global\MPlocaltextareadata\emptytoks}
 
-- 
cgit v1.2.3

