context-simplefonts update (14oct10)

git-svn-id: svn://tug.org/texlive/trunk@20103 c570f23f-e606-0410-a88d-b1316a301751

3 files changed, 17 insertions, 111 deletions

diff --git a/Master/texmf-dist/doc/context/third/simplefonts/simplefonts.pdf b/Master/texmf-dist/doc/context/third/simplefonts/simplefonts.pdf
deleted file mode 100644
index 3a2881fd1a4..00000000000
--- a/Master/texmf-dist/doc/context/third/simplefonts/simplefonts.pdf
+++ /dev/null
diff --git a/Master/texmf-dist/source/context/third/simplefonts/doc/simplefonts.tex b/Master/texmf-dist/source/context/third/simplefonts/doc/simplefonts.tex
deleted file mode 100644
index 1c56ae76d83..00000000000
--- a/Master/texmf-dist/source/context/third/simplefonts/doc/simplefonts.tex
+++ /dev/null
@@ -1,66 +0,0 @@
-\usemodule[simplefonts][size=10pt]
-
-\setmainfont[DejaVu Serif]
-\setsansfont[DejaVu Sans]
-\setmonofont[DejaVu Sans Mono]
-
-\starttext
-
-\startbodymatter
-
-\title{The {\em simplefonts} module}
-
-Writing typescripts for \ConTeXt\ can be a tedious job, … 
-
-\starttyping
-\simplefont[<font>][..,..=..,..]
-\stoptyping
-
-\startlines
-{\simplefont[TeX Gyre Pagella]TeX Gyre Pagella}
-{\simplefont[TeX Gyre Termes]TeX Gyre Termes}
-{\simplefont[TeX Gyre Heros]TeX Gyre Heros}
-{\simplefont[TeX Gyre Bonum]TeX Gyre Bonum}
-{\simplefont[TeX Gyre Schola]TeX Gyre Schola}
-{\simplefont[TeX Gyre Adventor]TeX Gyre Adventor}
-{\simplefont[TeX Gyre Cursor]TeX Gyre Cursor}
-{\simplefont[TeX Gyre Chorus]TeX Gyre Chorus}
-\stoplines
-
-\stopbodymatter
-
-\startappendices
-
-\section[sec:features]{Features}
-
-\startluacode
-tex.sprint("\\starttabulate[|l|p|p|]")
-for k, v in next, fonts.otf.tables.features do
-    tex.sprint(string.format("\\NC %s\\NC %s\\NC %s\\NC\\NR",k,string.gsub(v,"#","\\letterhash"),string.lower(string.gsub(v,"[^a-zA-Z0-9]",""))))
-end
-tex.sprint("\\stoptabulate")
-\stopluacode
-
-\section[sec:scripts]{Scripts}
-
-\startluacode
-tex.sprint("\\starttabulate[|l|p|p|]")
-for k, v in next, fonts.otf.tables.scripts do
-    tex.sprint(string.format("\\NC %s\\NC %s\\NC %s\\NC\\NR",k,string.gsub(v,"#","\\letterhash"),string.lower(string.gsub(v,"[^a-zA-Z0-9]",""))))
-end
-tex.sprint("\\stoptabulate")
-\stopluacode
-
-\section[sec:languages]{Languages}
-
-\startluacode
-tex.sprint("\\starttabulate[|l|p|p|]")
-for k, v in next, fonts.otf.tables.languages do
-    tex.sprint(string.format("\\NC %s\\NC %s\\NC %s\\NC\\NR",k,string.gsub(v,"#","\\letterhash"),string.lower(string.gsub(v,"[^a-zA-Z0-9]",""))))
-end
-tex.sprint("\\stoptabulate")
-\stopluacode
-
-\stopappendices
-
-\stoptext
diff --git a/Master/texmf-dist/tex/context/third/simplefonts/t-simplefonts.tex b/Master/texmf-dist/tex/context/third/simplefonts/t-simplefonts.tex
index 8c5c2a1cafb..f1f3479dea8 100644
--- a/Master/texmf-dist/tex/context/third/simplefonts/t-simplefonts.tex
+++ b/Master/texmf-dist/tex/context/third/simplefonts/t-simplefonts.tex
@@ -1,6 +1,6 @@
 %D \module
 %D   [     file=t-simplefonts,
-%D      version=2010.02.02,
+%D      version=2010.10.13,
 %D        title=\CONTEXT\ User Module,
 %D     subtitle=Simplefonts,
 %D       author=Wolfgang Schuster,
@@ -627,57 +627,29 @@
   {\dodoubleempty\dosimplefont}
 
 \def\dosimplefont[#1][#2]%
-  {\getparameters[\????sf\v!default][\c!features=\v!default,\c!alternative=\v!regular,\c!weight=\v!normal,#2]%
-   \ctxlua{fonts.define.command_1("\luaescapestring{#1}")}% taken from font-ini.mkiv
-   \ifcase\scaledfontmode\relax
-     % none
-     \scaledfontsize-1000\scaledpoint
-   \or
-     % at
-     \scaledfontsize\somefontsize
-   \or
-     % sa
-     \scaledfontsize\localabsolutefontsize\relax
-     \scaledfontsize\currentfontbodysize\scaledfontsize
-   \or
-     % mo
-     \scaledfontsize\setmappedfontsize\localabsolutefontsize
-     \scaledfontsize\currentfontbodysize\scaledfontsize
-   \or
-     % scaled
-     \scaledfontsize-\somefontsize\scaledpoint
+  {\getparameters[\????sf\v!default][\c!features=\v!default,\c!alternative=\v!regular,\c!weight=\v!normal,\c!size=,#2]%
+   \edef\simplefontsize{\namedsimplefontparameter\v!default\c!size}%
+   \ifx\simplefontsize\empty\else
+     \doifdimenstringelse\simplefontsize
+       {\edef\simplefontsize{ at \simplefontsize}}
+       {\edef\simplefontsize{    \simplefontsize}}%
    \fi
-   \scaledfontsize\localrelativefontsize\scaledfontsize
-   \ctxlua{thirddata.simplefonts.selectfont("\v!default","\truefontname\somefontname","","\@@@@sfdefaultalternative","\@@@@sfdefaultweight")}%
-   \definedfont[\csname\????sf\v!default\@@@@sfdefaultalternative\endcsname*\@@@@sfdefaultfeatures\space at \number\scaledfontsize sp]}
+   \ctxlua{thirddata.simplefonts.selectfont("\v!default","#2","","\@@@@sfdefaultalternative","\@@@@sfdefaultweight")}%
+   \expanded{\definedfont[\csname\????sf\v!default\@@@@sfdefaultalternative\endcsname*\@@@@sfdefaultfeatures\simplefontsize]}}
 
 \def\definesimplefont
   {\dotripleempty\dodefinesimplefont}
 
 \def\dodefinesimplefont[#1][#2][#3]%
-  {\getparameters[\????sf\v!default][\c!features=\v!default,\c!alternative=\v!regular,\c!weight=\v!normal,#3]%
-   \ctxlua{fonts.define.command_1("\luaescapestring{#2}")}% taken from font-ini.mkiv
-   \ifcase\scaledfontmode\relax
-     % none
-     \scaledfontsize-1000\scaledpoint
-   \or
-     % at
-     \scaledfontsize\somefontsize
-   \or
-     % sa
-     \scaledfontsize\localabsolutefontsize\relax
-     \scaledfontsize\currentfontbodysize\scaledfontsize
-   \or
-     % mo
-     \scaledfontsize\setmappedfontsize\localabsolutefontsize
-     \scaledfontsize\currentfontbodysize\scaledfontsize
-   \or
-     % scaled
-     \scaledfontsize-\somefontsize\scaledpoint
+  {\getparameters[\????sf\v!default][\c!features=\v!default,\c!alternative=\v!regular,\c!weight=\v!normal,\c!size=,#3]%
+   \edef\simplefontsize{\namedsimplefontparameter\v!default\c!size}%
+   \ifx\simplefontsize\empty\else
+     \doifdimenstringelse\simplefontsize
+       {\edef\simplefontsize{ at \simplefontsize}}
+       {\edef\simplefontsize{    \simplefontsize}}%
    \fi
-   \scaledfontsize\localrelativefontsize\scaledfontsize
-   \ctxlua{thirddata.simplefonts.selectfont("\v!default","\truefontname\somefontname","","\@@@@sfdefaultalternative","\@@@@sfdefaultweight")}%
-   \definefont[#1][\csname\????sf\v!default\@@@@sfdefaultalternative\endcsname*\@@@@sfdefaultfeatures\space at \number\scaledfontsize sp][#3]}
+   \ctxlua{thirddata.simplefonts.selectfont("\v!default","#2","","\@@@@sfdefaultalternative","\@@@@sfdefaultweight")}%
+   \expanded{\definefont[#1][\csname\????sf\v!default\@@@@sfdefaultalternative\endcsname*\@@@@sfdefaultfeatures\simplefontsize][#3]}}
 
 %D \macros
 %D   {simplefonttypeface,definesimplefonttypeface}