fonttable 1.3 (1may09)

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

1 files changed, 61 insertions, 7 deletions

diff --git a/Master/texmf-dist/tex/latex/fonttable/fonttable.sty b/Master/texmf-dist/tex/latex/fonttable/fonttable.sty
index c18b34bf2ed..dd740fde031 100644
--- a/Master/texmf-dist/tex/latex/fonttable/fonttable.sty
+++ b/Master/texmf-dist/tex/latex/fonttable/fonttable.sty
@@ -7,7 +7,7 @@
 %% fonttable.dtx  (with options: `pack')
 %% ------------------------------------------------------------------
 %%   Author: Peter Wilson (Herries Press) herries dot press at earthlink dot net
-%%   Copyright 2005 Peter R. Wilson
+%%   Copyright 2005--2009 Peter R. Wilson
 %% 
 %%   This work may be distributed and/or modified under the
 %%   conditions of the Latex Project Public License, either
@@ -23,7 +23,7 @@
 %%   This work consists of the files listed in the README file.
 %% ------------------------------------------------------------------
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{fonttable}[2005/12/06 v1.0a displays a font]
+\ProvidesPackage{fonttable}[2009/04/30 v1.3 displays a font]
 
 \providecommand*{\sevenrm}{\fontsize{7}{9pt}\rmfamily}
 \newcount\f@tm \newcount\f@tn \newcount\f@tp \newdimen\f@tdim
@@ -122,9 +122,10 @@
   \f@tsimpleline \\ \hline
   \f@tsimpleline \f@tevenlinenonum}
 
-\newcommand*{\f@tchartline}{&\f@toct{\0\1x}&&\:&&\:&&\:&&\:&&\:&&\:&&\:&&\:&&}
+\newcommand*{\f@tchartline}{%
+  &\f@toct{\0\1x}&&\f@tpsg{}&&\f@tpsg{}&&\f@tpsg{}&&\f@tpsg{}&&\f@tpsg{}&&\f@tpsg{}&&\f@tpsg{}&&\f@tpsg{}&&}
 \newcommand*{\f@tsimpleline}{%
-  \:\f@tchartstrut& \: & \: & \: & \: & \: & \: & \:}
+  \f@tpsg{}\f@tchartstrut& \f@tpsg{} & \f@tpsg{} & \f@tpsg{} & \f@tpsg{} & \f@tpsg{} & \f@tpsg{} & \f@tpsg{}}
 
 \newcommand*{\f@tchartstrut}{\lower4.5pt\vbox to14pt{}}
 \newdimen\ftablewidth
@@ -158,13 +159,13 @@
 
 \newcommand*{\nodecimals}{%
 %%% the original
-  \def\:{\setbox0=\hbox{\char\f@tn}%
+  \newcommand*{\f@tpsg}{\setbox0=\hbox{\char\f@tn}%
     \ifdim\ht0>7.5pt\f@treposition
     \else\ifdim\dp0>2.5pt\f@treposition\fi\fi
     \box0\global\advance\f@tn 1 }}
 \newcommand{\decimals}{%
 %%% mine
-  \def\:{\setbox0=\hbox{\char\f@tn\,\rlap{\tiny \the\f@tn}}%
+  \newcommand*{\f@tpsg}{\setbox0=\hbox{\char\f@tn\,\rlap{\tiny \the\f@tn}}%
     \ifdim\ht0>7.5pt\f@treposition
     \else\ifdim\dp0>2.5pt\f@treposition\fi\fi
     \box0\global\advance\f@tn 1 }}
@@ -223,9 +224,62 @@ official r\^ole in fluffy souffl\'es? }
   Pauline Qu\^eneau Roxanne Sabine T\~a{\'\j}a Ur\v{s}ula
   Vivian Wendy Xanthippe Yv{\o}nne Z\"azilie\par}
 
+\DeclareTextSymbol{\guillemotleft}{OT1}{`\'}
+\DeclareTextSymbol{\guillemotright}{OT1}{`\`}
+\providecommand{\flqq}{\guillemotleft}
+\providecommand{\frqq}{\guillemotright}
+
+\newcommand*{\germantext}{%
+Dies hier ist ein Blindtext zum Testen von Textausgaben. Wer
+diesen Text liest, ist selbst schuld. Der Text gibt lediglich den
+Grauwert der Schrift an. Ist das wirklich so? Ist es
+gleich\-g\"ul\-tig ob ich schreibe: \frqq Dies ist ein
+Blindtext\flqq\ oder \frqq Huardest gefburn\flqq? Kjift --
+mitnichten! Ein Blindtext bietet mir wichtige Informationen. An
+ihm messe ich die Lesbarkeit einer Schrift, ihre Anmutung, wie
+harmonisch die Figuren zueinander stehen und pr\"u\-fe, wie breit
+oder schmal sie l\"auft. Ein Blindtext sollte m\"og\-lichst viele
+verschiedene Buchstaben enthalten und in der Originalsprache
+gesetzt sein. Er mu\ss\ keinen Sinn ergeben, sollte aber lesbar
+sein. Fremdsprachige Texte wie \frqq Lorem ipsum\flqq\ dienen
+nicht dem eigentlichen Zweck, da sie eine
+falsche Anmutung vermitteln.\par}
+
+\newcommand*{\latintext}{%
+Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Etiam
+lobortis facilisis sem. Nullam nec mi et neque pharetra
+sollicitudin. Praesent imperdiet mi nec ante. Donec ullamcorper,
+felis non sodales commodo, lectus velit ultrices augue, a
+dignissim nibh lectus placerat pede. Vivamus nunc nunc, molestie
+ut, ultricies vel, semper in, velit. Ut porttitor. Praesent in
+sapien. Lorem ipsum dolor sit amet, consectetuer adipiscing elit.
+Duis fringilla tristique neque. Sed interdum libero ut metus.
+Pellentesque placerat. Nam rutrum augue a leo. Morbi sed elit sit
+amet ante lobortis sollicitudin. Praesent blandit blandit mauris.
+Praesent lectus tellus, aliquet aliquam, luctus a, egestas a,
+turpis. Mauris lacinia lorem sit amet ipsum. Nunc quis urna dictum
+turpis accumsan semper.\par}
+
 \newcommand*{\simpletext}{\let\moreknutext\relax \let\knunames\relax}
 \newcommand*{\fulltext}{\let\moreknutext\@moreknutext \let\knunames\@knunames}
-\simpletext
+\fulltext
+
+\def\fonttexts#1#2{%
+  \def\f@tfontname{#1}%
+  \bgroup
+  \f@tstartfont
+  #2
+  \egroup}
+
+\def\regulartexts#1#2{%
+  \bgroup
+  #1 #2
+  \egroup}
+
+\newcommand*{\aztext}{a b c d e f g h i j k l m n o p q r s t u v w x y z}
+\newcommand*{\AZtext}{A B C D E F G H I J K L M N O P Q R S T U V W X Y Z}
+\newcommand*{\digitstext}{0 1 2 3 4 5 6 7 8 9}
+\newcommand*{\punctext}{` ! @ \$ \& * ( ) \_ - + =  [ ] < > \{ \} : ; ' , . ? /}
 
 \endinput
 %%