From 43986f8edd2afd919afbb9988cb6778fc3c02077 Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Fri, 25 Sep 2009 09:42:00 +0200
Subject: beta 2009.09.25 09:42

---
 tex/context/base/m-chart.tex | 36 +++---------------------------------
 1 file changed, 3 insertions(+), 33 deletions(-)

(limited to 'tex/context/base/m-chart.tex')

diff --git a/tex/context/base/m-chart.tex b/tex/context/base/m-chart.tex
index c8928f2d5..5ccf4c2ad 100644
--- a/tex/context/base/m-chart.tex
+++ b/tex/context/base/m-chart.tex
@@ -15,8 +15,8 @@
 % todo: make mkiv variant
 % todo: use dimexpr/numspr
 
-% will be redone with layers and dimexpr ro even better, by just using
-% textext
+% will be redone with layers and dimexpr or even better, by just using
+% textext .. a nice example of old code
 
 %D This is an experimental module. Pieces of code will be moved
 %D to other modules. More features are possible but will be
@@ -1280,36 +1280,6 @@
 % \def\processFLOWbuffer#1{\getvalue{\FLOWbufferprefix#1}}
 % \def\typeFLOWbuffer   #1{[Sorry, no verbatim chart #1 available.]}
 
-%D The XML interface [will be mode protected or separate x-chart file]
-
-\startXMLdefinitions flowchart
-
-\defineXMLargument [flowchartdefinition]
-  {\defineFLOWchart[\XMLpar{flowchartdefinition}{identifier}{unknown}]}
-
-\defineXMLpickup [flowcell]
-  {\startFLOWcell
-   \defineXMLargument[name]{\unspaceafter\name}%
-   \defineXMLargument[shape]{\unspaceafter\shape}%
-   \defineXMLnestedargument[text]{\text}}
-  {\stopFLOWcell}
-
-\defineXMLenvironment [location] % global unspace/store
-  {\bgroup\defineXMLpush[x]\defineXMLpush[y]}
-  {\XMLunspace{x}\XMLunspace{y}%
-   \expanded{\egroup\noexpand\location{\XMLpop{x},\XMLpop{y}}}}
-
-\defineXMLenvironment [connection]
-  {\bgroup\defineXMLpush[type]\defineXMLpush[name]}%
-  {\XMLunspace{type}\XMLunspace{name}%
-   \expanded{\egroup\noexpand\connection[\XMLpop{type}]{\XMLpop{name}}}}
-
-\defineXMLsingular [flowchart]
-  {\expanded{\FLOWchart[\XMLpar{flowchart}{identifier}{unknown}]}}
-
-\defineXMLdirective [flowchart] [shapes] \setupFLOWshapes
-\defineXMLdirective [flowchart] [lines]  \setupFLOWlines
-
-\stopXMLdefinitions
+\loadmarkfile{m-chart}
 
 \protect \endinput
-- 
cgit v1.2.3