sansmath doc+own pkg (22apr10)

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

7 files changed, 229 insertions, 14 deletions

diff --git a/Master/texmf-dist/doc/latex/sansmath/miscdoc.sty b/Master/texmf-dist/doc/latex/sansmath/miscdoc.sty
new file mode 100644
index 00000000000..6b87603c995
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/sansmath/miscdoc.sty
@@ -0,0 +1,115 @@
+\ProvidesPackage{miscdoc}[2010/01/20 v1.2 documentation macros misc latex pkgs]
+
+% miscdoc.sty
+% Copyright 2010 Robin Fairbairns
+%
+% This work may be distributed and/or modified under the
+% conditions of the LaTeX Project Public License, either version 1.3
+% of this license or (at your option) any later version.
+% The latest version of this license is in
+%   http://www.latex-project.org/lppl.txt
+% and version 1.3 or later is part of all distributions of LaTeX
+% version 2005/12/01 or later.
+%
+% This work has the LPPL maintenance status `maintained'.
+% 
+% The Current Maintainer of this work is Robin Fairbairns.
+%
+% This work consists of the file miscdoc.sty (only)
+
+\setcounter{errorcontextlines}{1274}
+
+% The package arose from a small exercise to document packages whose
+% previous documentation consisted solely of comments in the package files.
+% The macros here defined are lifted from the author's faq.sty
+% (written for the UK TeX FAQ, CTAN:help/uk-tex-faq) or are inspired
+% by others' work (credited where the author is known) ... except
+% where they came as a flash of inspiration while actually writing the
+% documentation.
+
+% this option suggested by Heiko Oberdiek, 2010-01-29
+\DeclareOption{hyper}{%
+  \AtEndOfPackage{%
+    \RequirePackage[pdfusetitle]{hyperref}
+    \RequirePackage{bookmark}
+    \bookmarksetup{numbered,open,openlevel=1}
+  }
+}
+\ProcessOptions\relax
+
+% note: T1 encoding assumed
+\usepackage{lmodern}
+\usepackage[T1]{fontenc}
+\usepackage{booktabs}
+
+% from faq.sty
+\newcommand\cs[1]{\texttt{\char`\\#1}}
+\let\csx\cs
+\def\bsbs{\cs{\char`\\}}
+
+% \cmdinvoke\cs<argument sequence>
+% \cs typeset as above
+% <argument sequence> may consist of optional or mandatory arguments;
+%
+% the `arguments' are simply typesett \texttt, as yet -- if something
+% fancier is needed, there's a bunch of code needs rewriting here...
+\DeclareRobustCommand\cmdinvoke{\@ifstar
+  {\let\@tempa\emph\@scmdinvoke}%
+  {\let\@tempa\relax\@scmdinvoke}%
+}
+\def\@scmdinvoke#1{\texttt{\symbol{92}#1}%
+  \futurelet\@let@token\@cmdinvoke
+}
+\def\@cmdinvoke{\ifx\@let@token\bgroup
+    \let\@tempb\@cmdinvoke@lbrace
+  \else
+    \ifx\@let@token[% ]
+      \let\@tempb\@cmdinvoke@lbrack
+    \else
+      \ifx\@let@token(% )
+        \let\@tempb\@cmdinvoke@lparen
+      \else
+        \let\@tempb\@empty
+      \fi
+    \fi
+  \fi
+  \@tempb
+}
+\def\@cmdinvoke@lbrace#1{\penalty0\hskip0pt\relax
+  \texttt{\symbol{123}\@tempa{#1}\symbol{125}}%
+  \futurelet\@let@token\@cmdinvoke
+}
+\def\@cmdinvoke@lbrack[#1]{\penalty-150\hskip0pt\relax
+  \texttt{[\@tempa{#1}]}%
+  \futurelet\@let@token\@cmdinvoke
+}
+\def\@cmdinvoke@lparen(#1){\penalty-150\hskip0pt\relax
+  \texttt{(\@tempa{#1})}%
+  \futurelet\@let@token\@cmdinvoke
+}
+% and extension -- versions that take a single extra (delimiter)
+% argument, such as \delcmdinvoke{lscrunge}( ... awful syntax, but...
+\DeclareRobustCommand\delcmdinvoke{\@ifstar
+  {\let\@tempa\emph\@sdelcmdinvoke}%
+  {\let\@tempa\relax\@sdelcmdinvoke}%
+}
+\def\@sdelcmdinvoke#1#2{\texttt{\symbol{92}#1#2}%
+  \futurelet\@let@token\@cmdinvoke
+}
+
+% sui generis
+\newcommand\newitem{\par\addvspace{1ex}\noindent}
+
+% inspired by doc.sty in latex distribution
+\newcommand\meta[1]{\ensuremath{\langle}\emph{#1}\ensuremath{\rangle}}
+
+% meaningful names, as in faq.sty
+\newcommand\environment[1]{\texttt{#1}}
+\newcommand\pkgoption[1]{\texttt{#1}}
+\newcommand\extension[1]{\texttt{.#1}}
+\newcommand\Package[1]{\textsf{#1}}
+\def\option{\@ifnextchar[\@optionb\@option}% ]
+\def\@optionb[#1]{[{\normalfont\ttfamily#1}]}
+\def\@option#1{\texttt{#1}}
+
+\let\FontName\textsf
\ No newline at end of file
diff --git a/Master/texmf-dist/doc/latex/sansmath/sansmath.pdf b/Master/texmf-dist/doc/latex/sansmath/sansmath.pdf
new file mode 100644
index 00000000000..0701047bc34
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/sansmath/sansmath.pdf
diff --git a/Master/texmf-dist/doc/latex/sansmath/sansmath.tex b/Master/texmf-dist/doc/latex/sansmath/sansmath.tex
new file mode 100644
index 00000000000..ce89962389e
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/sansmath/sansmath.tex
@@ -0,0 +1,65 @@
+\documentclass[a4paper]{article}
+\usepackage[a4paper]{geometry}
+\usepackage{miscdoc}
+\usepackage[scaled=0.85]{luximono}
+\begin{document}
+\title{The \Package{sansmath} package}
+\author{Donald Arseneau\thanks{Documentation file assembled by Robin
+    Fairbairns}}
+\date{2003-08-13, version 1.0}
+\maketitle
+
+\section{Outline}
+The package is designed to offer sans-serif mathematics in the absence
+of proper sans maths fonts.
+
+The package's name could be misconstrued: there was an ambition to
+do the job for ``non-standard'' sans fonts (as indicated by the value
+of \cs{sfdefault}), but the only good results have been with Computer
+Modern and \FontName{cmss}.
+
+\section{Use}
+
+After \cmdinvoke{usepackage}{sansmath}, a new ``math version''
+\texttt{sans} is defined, together with a command \cs{sansmath}, which
+behaves as \cs{boldmath} does.
+
+There is also a command \cs{unsansmath} (which does what you might
+imagine), but if maths are to be sans-serif for a limited area of
+document, it is better to limit it to a local group, for example by
+\cmdinvoke{begin}{sansmath} \texttt{\dots} \cmdinvoke{end}{sansmath}
+
+Within the scope of the \cs{sansmath} declaration, maths characters
+will be taken from the text sans-serif family as much as possible.
+The actual sans fonts are OT1 encodings of those indicated by the 
+meaning of \cs{sfdefault} \emph{WHEN THE PACKAGE WAS LOADED}, not the
+meaning at each maths environment!
+
+Since the \texttt{OT1} text fonts do not provide the lower-case greek letters,
+there is a package option \option[eulergreek] to take the lowercase
+greek from the Euler maths fonts.
+
+Since some (many) sans fonts have no uppercase greek letters either
+(missing characters from the \texttt{OT1} encoding), there is an
+option \option[EULERGREEK] to take \emph{all} greek letters from the
+euler fonts.  In this case one should also investigate using
+\FontName{Euler} fonts for \emph{all maths} in the document, using
+package \Package{euler} instead of this one!
+
+\texttt{OT1} encoding is normally required to get the uppercase greek
+letters, but if you use the \option[EULERGREEK] option or don't use
+any uppercase greek letters, then you are welcome to define
+\cs{sansmathencoding} \emph{before} loading this package.  There is
+also a package option \option[T1] to perform that particuler
+definition.  Note the comment above about only \FontName{cmss} being
+good~--- even the \texttt{T1}-encoded \FontName{ec} fonts are poor
+substitutes.
+
+The package achieves maths-italic by reloading the slanted version of
+the text sans-serif font, and changing a \texttt{fontdimen} parameter
+(spaceskip).  This causes the italic correction to be applied between
+letters (good) but does not break up the `fi' and `fl' ligatures
+(bad).  (Why does a sans font have these ligatures anyway?)  As yet,
+nothing is done about this bug.
+
+\end{document}
diff --git a/Master/texmf-dist/tex/latex/ltxmisc/sansmath.sty b/Master/texmf-dist/tex/latex/sansmath/sansmath.sty
index bc757537179..cca83737096 100644
--- a/Master/texmf-dist/tex/latex/ltxmisc/sansmath.sty
+++ b/Master/texmf-dist/tex/latex/sansmath/sansmath.sty
@@ -1,13 +1,16 @@
 % LaTeX package sansmath: typeset sans-serif math using `text' fonts.
 %
-\ProvidesPackage{sansmath}[2006/11/10 \space ver 0.7  Donald Arseneau]
+\ProvidesPackage{sansmath}[2007/02/28 \space ver 1.1  Donald Arseneau]
 % 
 % Donald Arseneau,  asnd@triumf.ca,  Vancouver, Canada.
 %
-% This package is released to the public domain by the original
-% author, who does not support it, and requests that it be adopted
-% and supported by someone who actually knows something about math
-% font issues in LaTeX.
+% This package is released to the public domain by me, Donald Arseneau,
+% the original author, who disclaims all rights.  I do not support it, 
+% and request that it be adopted and supported by someone who knows 
+% more about math font issues in LaTeX.
+%
+% The point of this package is to allow sans-serif math in the absence
+% of proper sans math fonts.
 %
 % The author was persuaded to use the name `sansmath' in hopes of
 % working with various text sans fonts (indicated by \sfdefault)
@@ -18,9 +21,9 @@
 % ~~~~~~~~~~~~
 % Load this package by inserting `\usepackage{sansmath}' in the
 % document preamble.  This will define a new math version `sans'
-% and a command `\sansmath', much like `\boldmath'.  Note that
-% NO `\unsansmath' is defined, so if math is to be sans-serif for
-% just part of a document, one should declare `\sansmath' in a local
+% and a command `\sansmath', much like `\boldmath'.  There is also
+% an `\unsansmath' defined, but if math is to be sans-serif for
+% a region of a document, one should declare `\sansmath' in a local
 % group (perhaps with \begin{sansmath}...\end{sansmath}).  
 % Within the scope of the \sansmath declaration, math characters
 % will be taken from the text sans-serif family as much as possible.
@@ -58,6 +61,7 @@
 
 \let\EulGreek\relax
 \let\EuUCGreek\relax
+\let\NonEulGreek\relax
 \DeclareOption{EULERGREEK}{
   \ExecuteOptions{eulergreek}
   \def\EuUCGreek{%
@@ -66,14 +70,25 @@
 }}
 \DeclareOption{eulergreek}{
  \def\EulGreek{%
-  \ifnum\alpha<\@eugreekOffset
-    \@eug\alpha \@eug\beta \@eug\gamma \@eug\delta \@eug\epsilon
-    \@eug\zeta \@eug\eta \@eug\theta \@eug\iota \@eug\kappa \@eug\lambda
+  \ifnum\alpha<\@eugreekOffset % avoid multi-mapping when repeated
+    \EulGreekList
+    \EuUCGreek
+    \let\varrho\rho \let\varsigma\sigma % Euler's missing variants
+  \fi
+}
+\def\EulGreekList{\@eug\alpha \@eug\beta \@eug\gamma \@eug\delta 
+    \@eug\epsilon \@eug\zeta \@eug\eta \@eug\theta \@eug\iota \@eug\kappa 
+    \@eug\lambda
     \@eug\mu \@eug\nu \@eug\xi \@eug\pi \@eug\rho \@eug\sigma \@eug\tau
     \@eug\upsilon \@eug\phi \@eug\chi \@eug\psi \@eug\omega
     \@eug\varepsilon \@eug\vartheta \@eug\varpi \@eug\varphi
+}
+\def\NonEulGreek{% Reverse previous mapping
+  \ifnum\alpha>\@eugreekOffset % avoid multi-mapping when repeated
+    \@eugreekOffset=-\@eugreekOffset \@euGREEKOffset=-\@euGREEKOffset
+    \EulGreekList
     \EuUCGreek
-    \let\varrho\rho \let\varsigma\sigma % Euler's missing variants
+    \@eugreekOffset=-\@eugreekOffset \@euGREEKOffset=-\@euGREEKOffset
   \fi
 }}
 
@@ -128,6 +143,7 @@
  \advance\@eugreekOffset-\alpha
 
  \def\@eug#1{\@tempcnta#1\advance\@tempcnta\@eugreekOffset
+    %\message{Change \string#1 from \number#1 to \number\@tempcnta}%
     \mathchardef#1\@tempcnta}
 
  \ifx\EuUCGreek\relax\else
@@ -174,18 +190,27 @@
 }
 
 \def\sansmath{%
+  \ifx\mnorm@mathbf\mathbf\else \let\mnorm@mathbf\mathbf \fi
   \mathversion{sans}%
   \let\mathbf\mathsfbf
   \let\sansm@every@math\sfMathSwitch
   \EulGreek
 }
 
+\def\unsansmath{%
+  \mathversion{normal}%
+  \let\mathbf\mnorm@mathbf
+  \let\sansm@every@math\relax
+  \NonEulGreek
+}
+
 \expandafter\def\expandafter\check@mathfonts\expandafter{\check@mathfonts
    \sansm@every@math}
 
 \let\sansm@every@math\relax
+\let\mnorm@mathbf\mathbf
 
-% Repair of a LaTeX bug that has not been fixed in 5 years.
+% Repair of a LaTeX bug that has not been fixed in 6 years.
 % Latex bug: latex/3357
 
 \def \@fontswitch #1#2{%
diff --git a/Master/tlpkg/bin/tlpkg-ctan-check b/Master/tlpkg/bin/tlpkg-ctan-check
index 307d7dbb3ef..5637afb72bc 100755
--- a/Master/tlpkg/bin/tlpkg-ctan-check
+++ b/Master/tlpkg/bin/tlpkg-ctan-check
@@ -256,7 +256,7 @@ my @TLP_working = qw(
     rjlparshap rmpage
     robustcommand robustindex romannum rotating roundbox rsc rsfs
     rtkinenc rtklage ryethesis
-  sageep sauerj sauterfonts savefnmark savesym savetrees scale
+  sageep sansmath sauerj sauterfonts savefnmark savesym savetrees scale
     scalebar schemabloc scientificpaper sciposter screenplay script
     sdrt sectionbox sectsty selectp semantic semaphor seminar semioneside
     seqsplit setspace seuthesis sf298 sffms sfg sfheaders
@@ -347,24 +347,33 @@ my @TLP_no_check = (
   "gsftopk",		# binary
   "ifluatex",		# part of oberdiek
   "kpathsea",		# binary
+  "latex-bin",		# binary
   "lcdftypetools",	# binary
   "luatex",		# binary
   "makeindex",		# binary
+  "metafont",		# binary
   "metapost",		# binary
+  "mfware",		# binary
   "mltex",		# binary
   "omegaware",		# binary
   "pdftex",		# binary
   "powerdot",		# stale generated files on CTAN
   "synctex",		# binary
   "t1utils",		# binary
+  "tetex",		# our sources
+  "tex",		# binary
   "tex4ht",		# binary
+  "texconfig",		# our sources
   "texdoc",		# binary
   "texinfo",		# tl-update-auto
   "texlive.infra",	# binary
   "texware",		# binary
   "texworks",		# binary
+  "tie",		# binary
   "ttfutils",		# binary
+  "xdvi",		# binary
   "xetex",		# binary
+  "xetexconfig",	# our sources
 );
 
 exit (&main ());
diff --git a/Master/tlpkg/tlpsrc/collection-latexextra.tlpsrc b/Master/tlpkg/tlpsrc/collection-latexextra.tlpsrc
index e74b8f3fc8e..6f81621021d 100644
--- a/Master/tlpkg/tlpsrc/collection-latexextra.tlpsrc
+++ b/Master/tlpkg/tlpsrc/collection-latexextra.tlpsrc
@@ -510,6 +510,7 @@ depend romannum
 depend rotfloat
 depend rotpages
 depend rtkinenc
+depend sansmath
 depend sauerj
 depend savefnmark
 depend savesym
diff --git a/Master/tlpkg/tlpsrc/sansmath.tlpsrc b/Master/tlpkg/tlpsrc/sansmath.tlpsrc
new file mode 100644
index 00000000000..e69de29bb2d
--- /dev/null
+++ b/Master/tlpkg/tlpsrc/sansmath.tlpsrc