diff options
Diffstat (limited to 'tex')
-rw-r--r-- | tex/context/base/cont-new.tex | 2 | ||||
-rw-r--r-- | tex/context/base/context.tex | 2 | ||||
-rw-r--r-- | tex/context/base/core-mat.tex | 33 | ||||
-rw-r--r-- | tex/context/base/core-spa.tex | 37 | ||||
-rw-r--r-- | tex/context/base/spec-pdf.lua | 21 | ||||
-rw-r--r-- | tex/context/base/type-gyr.tex | 61 | ||||
-rw-r--r-- | tex/context/base/type-map.tex | 4 | ||||
-rw-r--r-- | tex/context/base/verb-sql.tex | 66 | ||||
-rw-r--r-- | tex/context/interface/keys-cz.xml | 2 | ||||
-rw-r--r-- | tex/context/interface/keys-de.xml | 2 | ||||
-rw-r--r-- | tex/context/interface/keys-en.xml | 2 | ||||
-rw-r--r-- | tex/context/interface/keys-fr.xml | 2 | ||||
-rw-r--r-- | tex/context/interface/keys-it.xml | 2 | ||||
-rw-r--r-- | tex/context/interface/keys-nl.xml | 2 | ||||
-rw-r--r-- | tex/context/interface/keys-ro.xml | 2 |
15 files changed, 129 insertions, 111 deletions
diff --git a/tex/context/base/cont-new.tex b/tex/context/base/cont-new.tex index bd56ee258..daaeb5782 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{2006.11.16 12:02} +\newcontextversion{2006.11.17 19:52} %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 290f15efa..d8736992b 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{2006.11.16 12:02} +\edef\contextversion{2006.11.17 19:52} %D For those who want to use this: diff --git a/tex/context/base/core-mat.tex b/tex/context/base/core-mat.tex index 21498b0a2..0a75bfcf6 100644 --- a/tex/context/base/core-mat.tex +++ b/tex/context/base/core-mat.tex @@ -2535,26 +2535,31 @@ \def\dofrac#1#2#3{\relax\mathematics{{{#1{#2}}\over{#1{#3}}}}} -\def\frac {\dofrac\mathstyle} -\def\xfrac #1#2{\begingroup - \let\xfrac\xxfrac - \dofrac\scriptstyle{#1}{#2}% - \endgroup} -\def\xxfrac#1#2{\begingroup - \dofrac\scriptscriptstyle{#1}{#2}% - \endgroup} +\unexpanded\def\frac + {\dofrac\mathstyle} + +\unexpanded\def\xfrac#1#2% + {\begingroup + \let\xfrac\xxfrac + \dofrac\scriptstyle{#1}{#2}% + \endgroup} + +\unexpanded\def\xxfrac#1#2% + {\begingroup + \dofrac\scriptscriptstyle{#1}{#2}% + \endgroup} %D The \type {xx} variant looks still ugly, so maybe it's %D best to say: -\def\xxfrac#1#2{\begingroup - \dofrac\scriptscriptstyle - {#1}{\raise.25ex\hbox{$\scriptscriptstyle#2$}}% - \endgroup} +\unexpanded\def\xxfrac#1#2% + {\begingroup + \dofrac\scriptscriptstyle{#1}{\raise.25ex\hbox{$\scriptscriptstyle#2$}}% + \endgroup} %D Something low level for scientific calculator notation: -\def\scinot#1#2% +\unexpanded\def\scinot#1#2% {#1\times10^{#2}} %D The next macro, \type {\ch}, is \PPCHTEX\ aware. In @@ -2565,7 +2570,7 @@ \let\mathstyle\relax \fi -\def\ch#1% +\unexpanded\def\ch#1% {\ifx\@@chemicalletter\undefined \mathstyle{\rm#1}% \else diff --git a/tex/context/base/core-spa.tex b/tex/context/base/core-spa.tex index dd24b3097..fa6e24a5b 100644 --- a/tex/context/base/core-spa.tex +++ b/tex/context/base/core-spa.tex @@ -2729,23 +2729,26 @@ \newskip\ctxrightskip \newskip\ctxmidskip -\def\dosinglenarrower#1% - {\processaction - [#1] - [ \v!left=>\global\advance\ctxleftskip \@@slleft, - \v!middle=>\global\advance\ctxmidskip \@@slmiddle, - \v!right=>\global\advance\ctxrightskip \@@slright, - \v!none=>, - \s!unknown=>\global\advance\ctxmidskip \commalistelement]} - -\def\donarrower[#1]% - {\processaction - [#1] - [ \v!left=>\global\advance\ctxleftskip \@@slleft, - \v!middle=>\global\advance\ctxmidskip \@@slmiddle, - \v!right=>\global\advance\ctxrightskip \@@slright, - \v!none=>,% handy for delimitedtexts - \s!unknown=>{\dorepeatwithcommand[#1]\dosinglenarrower}]} +% \def\dosinglenarrower#1% +% {\processaction +% [#1] +% [ \v!left=>\global\advance\ctxleftskip \@@slleft, +% \v!middle=>\global\advance\ctxmidskip \@@slmiddle, +% \v!right=>\global\advance\ctxrightskip \@@slright, +% \v!none=>, +% \s!unknown=>\global\advance\ctxmidskip \commalistelement]} + +% \def\donarrower[#1]% hm, can be dorepeat directly +% {\processaction +% [#1] +% [ \v!left=>\global\advance\ctxleftskip \@@slleft, +% \v!middle=>\global\advance\ctxmidskip \@@slmiddle, +% \v!right=>\global\advance\ctxrightskip \@@slright, +% \v!none=>,% handy for delimitedtexts +% \s!unknown=>{\dorepeatwithcommand[#1]\dosinglenarrower}]} + +\def\donarrower[#1]% hm, can be dorepeat directly + {\dorepeatwithcommand[#1]\dosinglenarrower} \def\complexstartnarrower[#1]% {\@@slbefore % was hard coded \par diff --git a/tex/context/base/spec-pdf.lua b/tex/context/base/spec-pdf.lua deleted file mode 100644 index f831fac1c..000000000 --- a/tex/context/base/spec-pdf.lua +++ /dev/null @@ -1,21 +0,0 @@ --- filename : spec-pdf.lua --- comment : companion to spec-fdf.tex --- author : Hans Hagen, PRAGMA-ADE, Hasselt NL --- copyright: PRAGMA ADE / ConTeXt Development Team --- license : see context related readme files - -if not pdf then pdf = { } end - -function pdf.cleandestination(str) - tex.sprint((string.gsub(str,"[%/%#%<%>%[%]%(%)%-%s]+","-"))) -end - -if not pdf then pdf = { } end - -function pdf.cleandestination(str) - tex.sprint((string.gsub(str,"[%/%#%<%>%[%]%(%)%-%s]+","-"))) -end - -function pdf.santizedstring(str) - tex.sprint((string.gsub(str,"([\\/#<>%[%]%(%)])","\\%1"))) -end diff --git a/tex/context/base/type-gyr.tex b/tex/context/base/type-gyr.tex index e5075de58..07b9b3111 100644 --- a/tex/context/base/type-gyr.tex +++ b/tex/context/base/type-gyr.tex @@ -11,6 +11,21 @@ %C therefore copyrighted by \PRAGMA. See mreadme.pdf for %C details. +% \usetypescriptfile[type-gyr] +% \definetypeface[pagella][rm][serif][pagella][default][encoding=t5] +% \setupbodyfont[pagella] +% \starttext +% \startlines +% hello world 123 +% {hello \Var[sc] world 123} +% {\it hello \Var[sc]world \Var[reset] 123} +% {\bf hello \Var[osf] {\Var[reset] world} 123} +% {\bi hello world \Var[osf]123} +% {\sc hello \Var[sc] world \Var[reset] 123} +% \stoplines +% \showfont[SerifItalicCaps] +% \stoptext + \starttypescriptcollection[gyre] %D First we define the new ones. Watch how we use the systematic name composition. @@ -26,24 +41,40 @@ \starttypescript [serif] [pagella,termes,bonum] [texnansi,ec,8r,t5,qx] \loadmapfile[\typescriptthree-q\typescriptprefix{f:\typescripttwo}.map] - \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Regular] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}r] [encoding=\typescriptthree] - \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Italic] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}ri] [encoding=\typescriptthree] - \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Bold] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}b] [encoding=\typescriptthree] - \definefontsynonym [\typescriptprefix{n:\typescripttwo}-BoldItalic] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}bi] [encoding=\typescriptthree] - \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Caps] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}r-sc] [encoding=\typescriptthree] - - \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Slanted] [\typescriptprefix{n:\typescripttwo}-Italic] - \definefontsynonym [\typescriptprefix{n:\typescripttwo}-BoldSlanted] [\typescriptprefix{n:\typescripttwo}-BoldItalic] + \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Regular] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}r] [encoding=\typescriptthree] + \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Italic] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}ri] [encoding=\typescriptthree] + \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Bold] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}b] [encoding=\typescriptthree] + \definefontsynonym [\typescriptprefix{n:\typescripttwo}-BoldItalic] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}bi] [encoding=\typescriptthree] + \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Caps] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}r-sc] [encoding=\typescriptthree] + \definefontsynonym [\typescriptprefix{n:\typescripttwo}-ItalicCaps] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}ri-sc] [encoding=\typescriptthree] + \definefontsynonym [\typescriptprefix{n:\typescripttwo}-BoldCaps] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}b-sc] [encoding=\typescriptthree] + \definefontsynonym [\typescriptprefix{n:\typescripttwo}-BoldItalicCaps] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}bi-sc] [encoding=\typescriptthree] + + \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Slanted] [\typescriptprefix{n:\typescripttwo}-Italic] + \definefontsynonym [\typescriptprefix{n:\typescripttwo}-BoldSlanted] [\typescriptprefix{n:\typescripttwo}-BoldItalic] \stoptypescript \starttypescript [serif] [pagella,termes,bonum] [name] - \definefontsynonym [Serif] [\typescriptprefix{n:\typescripttwo}-Regular] - \definefontsynonym [SerifItalic] [\typescriptprefix{n:\typescripttwo}-Italic] - \definefontsynonym [SerifBold] [\typescriptprefix{n:\typescripttwo}-Bold] - \definefontsynonym [SerifBoldItalic] [\typescriptprefix{n:\typescripttwo}-BoldItalic] - \definefontsynonym [SerifCaps] [\typescriptprefix{n:\typescripttwo}-Caps] - \definefontsynonym [SerifSlanted] [\typescriptprefix{n:\typescripttwo}-Slanted] - \definefontsynonym [SerifBoldSlanted] [\typescriptprefix{n:\typescripttwo}-BoldSlanted] + \definefontsynonym [Serif] [\typescriptprefix{n:\typescripttwo}-Regular] + \definefontsynonym [SerifItalic] [\typescriptprefix{n:\typescripttwo}-Italic] + \definefontsynonym [SerifBold] [\typescriptprefix{n:\typescripttwo}-Bold] + \definefontsynonym [SerifBoldItalic] [\typescriptprefix{n:\typescripttwo}-BoldItalic] + \definefontsynonym [SerifCaps] [\typescriptprefix{n:\typescripttwo}-Caps] + \definefontsynonym [SerifSlanted] [\typescriptprefix{n:\typescripttwo}-Slanted] + \definefontsynonym [SerifBoldSlanted] [\typescriptprefix{n:\typescripttwo}-BoldSlanted] + + \definefontvariant [Serif][osf][Caps] + \definefontvariant [Serif][sc] [Caps] + + \definefontsynonym [SerifRegular] [\typescriptprefix{n:\typescripttwo}-Regular] + \definefontsynonym [SerifRegularCaps] [\typescriptprefix{n:\typescripttwo}-Caps] + \definefontsynonym [SerifItalicCaps] [\typescriptprefix{n:\typescripttwo}-ItalicCaps] + \definefontsynonym [SerifBoldCaps] [\typescriptprefix{n:\typescripttwo}-BoldCaps] + \definefontsynonym [SerifBoldItalicCaps] [\typescriptprefix{n:\typescripttwo}-BoldItalicCaps] + \definefontsynonym [SerifCapsCaps] [\typescriptprefix{n:\typescripttwo}-Caps] + \definefontsynonym [SerifSlantedCaps] [\typescriptprefix{n:\typescripttwo}-ItalicCaps] + \definefontsynonym [SerifBoldSlantedCaps] [\typescriptprefix{n:\typescripttwo}-BoldItalicCaps] + \stoptypescript \starttypescript [map] [pagella,termes,bonum] [ec,texnansi,t5,8r] diff --git a/tex/context/base/type-map.tex b/tex/context/base/type-map.tex index d6d8e2fcb..968e42511 100644 --- a/tex/context/base/type-map.tex +++ b/tex/context/base/type-map.tex @@ -65,11 +65,11 @@ \starttypescript [map] [modern,modern-vari,modern-cond,computer-modern,latin-modern,latin-modern-vari,latin-modern-cond,] [ec,texnansi,qx,t5] % this was what we had at the start and what fits best into our naming scheme % well, all those changes in lm gave too many user problem reports so i revert to: - \loadmapfile[\typescriptthree-public-lm.map] + % \loadmapfile[\typescriptthree-public-lm.map] % this one also fits into the naming scheme but has been dropped by the distributers % \loadmapfile[\typescriptthree-lm.map] % this is what the latest distributions provide - % \loadmapfile[lm-\typescriptthree.map] % maybe some day + \loadmapfile[lm-\typescriptthree.map] % maybe some day \stoptypescript % \usetypescript [map] [latin-modern-os] [ec] % lm is loaded under ec regime diff --git a/tex/context/base/verb-sql.tex b/tex/context/base/verb-sql.tex index 555ba304b..ddac5cd25 100644 --- a/tex/context/base/verb-sql.tex +++ b/tex/context/base/verb-sql.tex @@ -8,61 +8,61 @@ %D copyright={Berend de Boer \& Hans Hagen}] %C %C This module is part of the \CONTEXT\ macro||package and is -%C therefore copyrighted by \PRAGMA. See mreadme.pdf for -%C details. +%C therefore copyrighted by \PRAGMA. See mreadme.pdf for +%C details. \writestatus{loading}{Context Support Macros / Pretty SQL Verbatim} %D \quotation {He, I want pretty pretting too!}, Berend cried out -%D one day, \quotation {But now for \SQL.}. This query language -%D shows code like: -%D +%D one day, \quotation {But now for \SQL.}. This query language +%D shows code like: +%D %D \startbuffer %D \startSQL -%D select * -- some comment +%D select * -- some comment %D from tableA %D where 1 = 2 %D \stopSQL -%D \stopbuffer +%D \stopbuffer %D -%D \typebuffer +%D \typebuffer %D %D and this should become something pretty like: %D %D \getbuffer %D -%D or, with Berend's preferences: +%D or, with Berend's preferences: %D %D \startbuffer[setup] %D \setuptyping %D [SQL] %D [text=yes,palet=,icommand=\bf,vcommand=,ccommand=\it] -%D \stopbuffer +%D \stopbuffer %D %D \getbuffer[setup] %D \getbuffer %D -%D This kind of pretty printing is accomplished by: +%D This kind of pretty printing is accomplished by: %D -%D \typebuffer - -%D Like we did with the \JAVASCRIPT\ driver, we will borrow +%D \typebuffer + +%D Like we did with the \JAVASCRIPT\ driver, we will borrow %D most of the macros from the \PERL\ driver. \ifx\undefined\setupprettyPLtype \input verb-pl \relax \fi \unprotect -%D \SQL\ has the one line comment sequence \type{--} and the -%D multi line comment delimiters \type{/*} and \type{*/}. The +%D \SQL\ has the one line comment sequence \type{--} and the +%D multi line comment delimiters \type{/*} and \type{*/}. The %D next counter keeps track of multi line comment nesting. \newcount\SQLcommentlevel -%D We need to handle \type{%}, \type{#} and \type{-} a bit -%D different than in the \PERL\ driver. Compared to the -%D \JAVASCRIPT\ driver |<|we copied most of the code from -%D that one|>|, we now also have type~45. +%D We need to handle \type{%}, \type{#} and \type{-} a bit +%D different than in the \PERL\ driver. Compared to the +%D \JAVASCRIPT\ driver |<|we copied most of the code from +%D that one|>|, we now also have type~45. \gdef\SQLsetspecials% {\PLsetspecials @@ -73,7 +73,7 @@ \setpretty`\*=44 \setpretty`\-=45 } -%D We need three additional handlers: +%D We need three additional handlers: \gdef\SQLsethandlers% {\PLsethandlers @@ -81,14 +81,14 @@ \installprettyhandler 44 \SQLtypefourfour \installprettyhandler 45 \SQLtypefourfive } -%D Next we have to do some general housekeeping. +%D Next we have to do some general housekeeping. \gdef\SQLsetcontrols% {\PLsetcontrols \def\flushrestofverbatimline% {\endPLtypesix - \ifcase\SQLcommentlevel - \inPLcommentfalse + \ifcase\SQLcommentlevel + \inPLcommentfalse \verbatimfont \fi \PLverbosefalse @@ -108,8 +108,8 @@ \SQLsetspecials \PLsetdiagnostics} -%D We have to look upto four characters ahead. If you don't -%D grab the picture, just skip reading these macros. +%D We have to look upto four characters ahead. If you don't +%D grab the picture, just skip reading these macros. \gdef\SQLtypefourthree% {\handlenextnextpretty\doSQLtypefourthree\PLtypefourtwo} @@ -160,8 +160,8 @@ \ifnum\prettytype=43 \SQLtogglecomment{#1}#2% \global\advance\SQLcommentlevel by -1 - \ifcase\SQLcommentlevel - \global\inPLcommentfalse + \ifcase\SQLcommentlevel + \global\inPLcommentfalse \prettyverbatimfont \fi \else @@ -170,8 +170,8 @@ \expandafter#2% \fi} -%D Much of the indirect calls (\type {dodo..}) is due to -%D looking ahead as well as midway pretty print changing. +%D Much of the indirect calls (\type {dodo..}) is due to +%D looking ahead as well as midway pretty print changing. \gdef\SQLtypefourfive% {\handlenextnextpretty\doSQLtypefourfive\PLtypefourtwo} @@ -207,7 +207,7 @@ \expandafter\next \fi} -%D We need a different list of reserved words. This list +%D We need a different list of reserved words. This list %D replaces the \PERL\ one. \useprettyidentifiers \SQLidentifiers \SQLsetspecials @@ -222,9 +222,9 @@ references return revoce right rollback rule select set sum table then to tran transaction trigger truncate uncommited union unique update use values varying view - when where while with work + when where while with work primary \useprettyidentifiers \SQLvariables \SQLsetspecials not-yet-defined -\protect \endinput +\protect \endinput diff --git a/tex/context/interface/keys-cz.xml b/tex/context/interface/keys-cz.xml index df1480294..2ff97c876 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="2006.11.16 12:02"> +<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="cz" version="2006.11.17 19:52"> <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 ecdba4f82..fb1e35eaf 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="2006.11.16 12:02"> +<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="de" version="2006.11.17 19:52"> <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 258d50e37..f515dffa8 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="2006.11.16 12:02"> +<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="en" version="2006.11.17 19:52"> <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 e94ebeec7..0c332407a 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="2006.11.16 12:02"> +<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="fr" version="2006.11.17 19:52"> <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 5392b29f3..6091fe8ee 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="2006.11.16 12:02"> +<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="it" version="2006.11.17 19:52"> <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 cd94cf859..7f238cdf6 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="2006.11.16 12:02"> +<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="nl" version="2006.11.17 19:52"> <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 b6d43b0dc..80a061a17 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="2006.11.16 12:02"> +<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="ro" version="2006.11.17 19:52"> <cd:variables> <cd:variable name="one" value="unu"/> |