summaryrefslogtreecommitdiff
path: root/tex
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2007-02-21 11:55:00 +0100
committerHans Hagen <pragma@wxs.nl>2007-02-21 11:55:00 +0100
commit29f7819d5e497bf8181e7cee80f8ef56995db3f4 (patch)
treeb51b1065730cd9bacb50b90dc80228101cfc792b /tex
parentae7756295182e4a03b95a7ae8a0c7ba6e74f85b6 (diff)
downloadcontext-29f7819d5e497bf8181e7cee80f8ef56995db3f4.tar.gz
stable 2007.02.21 11:55
Diffstat (limited to 'tex')
-rw-r--r--tex/context/base/cont-new.tex2
-rw-r--r--tex/context/base/context.tex2
-rw-r--r--tex/context/base/core-ctx.tex6
-rw-r--r--tex/context/base/core-fig.tex20
-rw-r--r--tex/context/base/supp-fil.mkii3
-rw-r--r--tex/context/base/supp-fil.tex35
-rw-r--r--tex/context/base/verb-ini.tex5
-rw-r--r--tex/context/base/x-res-08.tex7
-rw-r--r--tex/context/interface/keys-cz.xml2
-rw-r--r--tex/context/interface/keys-de.xml2
-rw-r--r--tex/context/interface/keys-en.xml2
-rw-r--r--tex/context/interface/keys-fr.xml2
-rw-r--r--tex/context/interface/keys-it.xml2
-rw-r--r--tex/context/interface/keys-nl.xml2
-rw-r--r--tex/context/interface/keys-ro.xml2
15 files changed, 63 insertions, 31 deletions
diff --git a/tex/context/base/cont-new.tex b/tex/context/base/cont-new.tex
index fa0d41815..36e08264d 100644
--- a/tex/context/base/cont-new.tex
+++ b/tex/context/base/cont-new.tex
@@ -13,7 +13,7 @@
% it's about time to clean up this file ...
-\newcontextversion{2007.02.20 12:00}
+\newcontextversion{2007.02.21 11:55}
%D This file is loaded at runtime, thereby providing an
%D excellent place for hacks, patches, extensions and new
diff --git a/tex/context/base/context.tex b/tex/context/base/context.tex
index 86277019f..b9a4d7f9c 100644
--- a/tex/context/base/context.tex
+++ b/tex/context/base/context.tex
@@ -42,7 +42,7 @@
%D your styles an modules.
\edef\contextformat {\jobname}
-\edef\contextversion{2007.02.20 12:00}
+\edef\contextversion{2007.02.21 11:55}
%D For those who want to use this:
diff --git a/tex/context/base/core-ctx.tex b/tex/context/base/core-ctx.tex
index 9cd3de2b9..64f6b82ae 100644
--- a/tex/context/base/core-ctx.tex
+++ b/tex/context/base/core-ctx.tex
@@ -184,10 +184,12 @@
\the\everybeforereadfile
\ifcase\preprocessstate
% no checking or not found when using method 1
- \normalinput\readfilename
+% \normalinput\readfilename
+ \inputgivenfile\readfilename
\or
% found when using method 1 or 2
- \normalinput\readfilename\preprocesssuffix
+% \normalinput\readfilename\preprocesssuffix
+ \inputgivenfile{\readfilename\preprocesssuffix}%
\or
% not found when using method 2
\fi
diff --git a/tex/context/base/core-fig.tex b/tex/context/base/core-fig.tex
index ed893fa42..194959bfd 100644
--- a/tex/context/base/core-fig.tex
+++ b/tex/context/base/core-fig.tex
@@ -11,7 +11,7 @@
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.
-% todo: directory : system -> \allinputpaths
+% todo: directory : system -> \allinputpaths (so that we can \usesubpath)
%D It may be that some functionality got lost. If it concerns
%D defined features, let me know and it will be sorted out.
@@ -908,6 +908,7 @@
\resetwantedconversionvariables
\doifsomething\@@efconversion
{\global\advance\nofconversionfigures\plusone
+ \doshowfigurestate{n-of-conversions : \number\nofconversionfigures}%
\edef\wantedfigureconversion{\@@efconversion}%
\edef\wantedconversioncache {\@@efcache}%
\edef\wantedconversionprefix{\@@efprefix}%
@@ -915,8 +916,8 @@
\processcommacommand[\figurepathlist]\dolocatefigureconversionfile
\ifcase\figurestatus
\doshowfigurestate{remark : no conversion file found}%
- \else
- \doshowfigurestate{remark : conversion file found}%
+ \else
+ \doshowfigurestate{remark : conversion file found}%
\chardef\figurestatus\zerocount
\fi
\let\wantedconversionname\wantedfigurename
@@ -924,12 +925,23 @@
\ifx\wantedconversioncache\empty
\let \wantedfigurepath \wantedconversionpath
\else
- \edef\wantedfigurepath{\wantedconversionpath/\@@efcache}%
+ \checkfilename\@@efcache
+ \ifnum\kindoffile=\plusone
+ \let\wantedfigurepath\@@efcache % root related path
+ \else
+ \edef\wantedfigurepath{\wantedconversionpath/\@@efcache}%
+ \fi
\fi
\let\wantedfiguretype \empty
\let\wantedfiguretypelist\figuretypes % hm, why needed
\doshowfigurestate{conversion path : \wantedconversionpath}%
\doshowfigurestate{conversion name : \wantedconversionname}}%
+\ifx\figurepathlist\empty
+ \let\figurepathlist\wantedfigurepath
+\else
+ \edef\figurepathlist{\wantedfigurepath,\figurepathlist}%
+\fi
+ \doshowfigurestate{new figure path : \wantedfigurepath}%
\fi}
\def\dolocatefigureconversionfile#1%
diff --git a/tex/context/base/supp-fil.mkii b/tex/context/base/supp-fil.mkii
index 56810f826..56ff7962a 100644
--- a/tex/context/base/supp-fil.mkii
+++ b/tex/context/base/supp-fil.mkii
@@ -13,6 +13,9 @@
\unprotect
+\def\openinputfile #1#2{\immediate\openin #1="#2"\relax} \def\closeinputfile #1{\immediate\closein #1}
+\def\openoutputfile#1#2{\immediate\openout#1="#2"\relax} \def\closeoutputfile#1{\immediate\closeout#1}
+
%D For the moment, we limit sanitizing to taking care of
%D active \type {/}.
diff --git a/tex/context/base/supp-fil.tex b/tex/context/base/supp-fil.tex
index b41858396..222db7bd5 100644
--- a/tex/context/base/supp-fil.tex
+++ b/tex/context/base/supp-fil.tex
@@ -42,8 +42,14 @@
%D
%D We save a few primitives first.
-\let\normalwrite\write
+\let\normalwrite \write
\let\normalimmediate\immediate
+
+% \def\openinputfile #1#2{\immediate\openin #1="#2"\relax} \def\closeinputfile #1{\immediate\closein #1}
+% \def\openoutputfile#1#2{\immediate\openout#1="#2"\relax} \def\closeoutputfile#1{\immediate\closeout#1}
+
+\def\openinputfile #1#2{\immediate\openin #1=#2\relax} \def\closeinputfile #1{\immediate\closein #1}
+\def\openoutputfile#1#2{\immediate\openout#1=#2\relax} \def\closeoutputfile#1{\immediate\closeout#1}
%D \macros
%D {pushendofline,popendofline}
@@ -109,7 +115,8 @@
%D one.
\def\unlinkfile#1%
- {\immediate\openout\scratchwrite=#1\immediate\closeout\scratchwrite}
+ {\openoutputfile \scratchwrite{#1}%
+ \closeoutputfile\scratchwrite}
%D \macros
%D {writeln}
@@ -121,12 +128,12 @@
\def\doiffileexistselse#1%
{\doifelsenothing{#1}
{\secondoftwoarguments}
- {\immediate\openin\scratchread=#1\relax
+ {\openinputfile\scratchread{#1}%
\ifeof\scratchread
- \immediate\closein\scratchread
+ \closeinputfile\scratchread
\expandafter\secondoftwoarguments
\else
- \immediate\closein\scratchread
+ \closeinputfile\scratchread
\expandafter\firstoftwoarguments
\fi}}
@@ -151,14 +158,14 @@
\let\fileline\empty
\def\doprocessfile#1#2#3%
- {\immediate\openin#1=#2\relax
+ {\openinputfile{#1}{#2}%
\ifeof#1%
\fileprocessedfalse
- \immediate\closein#1%
+ \closeinputfile#1%
\else
\fileprocessedtrue
\gdef\dofinishfile
- {\immediate\closein#1%
+ {\closeinputfile#1%
\global\let\doprocessline\relax}%
\gdef\doprocessline
{\ifeof#1%
@@ -214,6 +221,8 @@
\unexpanded\def\input{\normalinput}
+\def\inputgivenfile#1{\normalinput"#1"\relax}
+
%D \macros
%D {readfile,ReadFile,maxreadlevel}
%D
@@ -343,7 +352,8 @@
\setxvalue{fn..\trackedfilename}{\readfilename}%
\fi
\the\everybeforereadfile
- \normalinput\readfilename\relax
+% \normalinput\readfilename\relax
+ \inputgivenfile\readfilename
\the\everyafterreadfile}
% too less:
@@ -452,11 +462,11 @@
\checkfilename\readfilename
\ifcase\kindoffile
\increment\readlevel
- \immediate\openin#1=\readfilename\relax
+ \openinputfile{#1}\readfilename
\ifeof#1% \relax
\ifnum\readlevel>\maxreadlevel % \relax
\else
- \immediate\closein#1% \relax
+ \closeinputfile#1% \relax
\doopenin{#1}{\pathplusfile\f!parentpath{#2}}%
\fi
\fi
@@ -532,7 +542,8 @@
{\gobbleoneargument}}
\def\doinputonce#1%
- {\doonlyonce{#1}{\doiffileelse{#1}{\normalinput#1\relax}\donothing}}
+% {\doonlyonce{#1}{\doiffileelse{#1}{\normalinput#1\relax}\donothing}}
+ {\doonlyonce{#1}{\doiffileelse{#1}{\inputgivenfile{#1}}\donothing}}
\def\doendinputonce#1%
{\doifdefined{@@@#1@@@}\endinput}
diff --git a/tex/context/base/verb-ini.tex b/tex/context/base/verb-ini.tex
index 4432da3b7..f4b24d730 100644
--- a/tex/context/base/verb-ini.tex
+++ b/tex/context/base/verb-ini.tex
@@ -758,7 +758,7 @@
{\par
\bgroup
\processingverbatimtrue
- \global\verbatimlinenumber0
+ \global\verbatimlinenumber\zerocount
\global\linepartrue
\beginofverbatimlines
\bgroup
@@ -779,7 +779,8 @@
\obeycharacters
\ignoreeofs
\catcode`\^^M=\@@ignore % \par is already taken care of
- \openin\verbatiminput=#1\relax
+% \openin\verbatiminput=#1\relax
+ \openinputfile\verbatiminput{#1}%
\skipfirstverbatimlinefalse
\initializeverbatimline
\def\readline%
diff --git a/tex/context/base/x-res-08.tex b/tex/context/base/x-res-08.tex
index 548933123..d90c421e1 100644
--- a/tex/context/base/x-res-08.tex
+++ b/tex/context/base/x-res-08.tex
@@ -113,12 +113,15 @@
\ifx\nofconversionfigures\undefined \chardef\nofconversionfigures\plusone \fi
\appendtoks
- \ifcase\nofconversionfigures\else
+ \ifcase\nofconversionfigures
+ \writestatus\m!systems{not registering rlxtools (manipulator)}%
+ \else
+ \writestatus\m!systems{registering rlxtools (manipulator)}%
\doiflocfileelse{\jobname.rlx}
{\installprogram{texmfstart rlxtools --manipulate kpse:\jobname.rlx \jobname.rlg}}
{\installprogram{texmfstart rlxtools --manipulate kpse:\getvariabledefault{rl:manipulate}{file}{rlxtools.rlx} \jobname.rlg}}%
\fi
-\to \everylastshipout
+\to \everybye % \everylastshipout
\appendtoks \openXMLresourcelog \to \everystarttext
\appendtoks \closeXMLresourcelog \to \everystoptext
diff --git a/tex/context/interface/keys-cz.xml b/tex/context/interface/keys-cz.xml
index e364f5814..0bcfe9c08 100644
--- a/tex/context/interface/keys-cz.xml
+++ b/tex/context/interface/keys-cz.xml
@@ -1,6 +1,6 @@
<?xml version="1.0"?>
-<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="cz" version="2007.02.20 12:00">
+<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="cz" version="2007.02.21 11:55">
<cd:variables>
<cd:variable name="one" value="jedna"/>
diff --git a/tex/context/interface/keys-de.xml b/tex/context/interface/keys-de.xml
index 1ae750baf..84f7d4cda 100644
--- a/tex/context/interface/keys-de.xml
+++ b/tex/context/interface/keys-de.xml
@@ -1,6 +1,6 @@
<?xml version="1.0"?>
-<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="de" version="2007.02.20 12:00">
+<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="de" version="2007.02.21 11:55">
<cd:variables>
<cd:variable name="one" value="eins"/>
diff --git a/tex/context/interface/keys-en.xml b/tex/context/interface/keys-en.xml
index 828735868..bea0c41b8 100644
--- a/tex/context/interface/keys-en.xml
+++ b/tex/context/interface/keys-en.xml
@@ -1,6 +1,6 @@
<?xml version="1.0"?>
-<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="en" version="2007.02.20 12:00">
+<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="en" version="2007.02.21 11:55">
<cd:variables>
<cd:variable name="one" value="one"/>
diff --git a/tex/context/interface/keys-fr.xml b/tex/context/interface/keys-fr.xml
index 837cfe1ed..42299b771 100644
--- a/tex/context/interface/keys-fr.xml
+++ b/tex/context/interface/keys-fr.xml
@@ -1,6 +1,6 @@
<?xml version="1.0"?>
-<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="fr" version="2007.02.20 12:00">
+<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="fr" version="2007.02.21 11:55">
<cd:variables>
<cd:variable name="one" value="un"/>
diff --git a/tex/context/interface/keys-it.xml b/tex/context/interface/keys-it.xml
index bf7d53907..394ae8e5b 100644
--- a/tex/context/interface/keys-it.xml
+++ b/tex/context/interface/keys-it.xml
@@ -1,6 +1,6 @@
<?xml version="1.0"?>
-<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="it" version="2007.02.20 12:00">
+<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="it" version="2007.02.21 11:55">
<cd:variables>
<cd:variable name="one" value="uno"/>
diff --git a/tex/context/interface/keys-nl.xml b/tex/context/interface/keys-nl.xml
index 4bbfe8cb2..961e620c7 100644
--- a/tex/context/interface/keys-nl.xml
+++ b/tex/context/interface/keys-nl.xml
@@ -1,6 +1,6 @@
<?xml version="1.0"?>
-<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="nl" version="2007.02.20 12:00">
+<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="nl" version="2007.02.21 11:55">
<cd:variables>
<cd:variable name="one" value="een"/>
diff --git a/tex/context/interface/keys-ro.xml b/tex/context/interface/keys-ro.xml
index 731bc3da8..fee47cf19 100644
--- a/tex/context/interface/keys-ro.xml
+++ b/tex/context/interface/keys-ro.xml
@@ -1,6 +1,6 @@
<?xml version="1.0"?>
-<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="ro" version="2007.02.20 12:00">
+<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="ro" version="2007.02.21 11:55">
<cd:variables>
<cd:variable name="one" value="unu"/>