From 03e895528bdcda911fdf41b8e1da264aef4516d5 Mon Sep 17 00:00:00 2001
From: Karl Berry <karl@freefriends.org>
Date: Mon, 29 Sep 2008 00:11:18 +0000
Subject: fontinst 1.929 (28sep08)

git-svn-id: svn://tug.org/texlive/trunk@10781 c570f23f-e606-0410-a88d-b1316a301751
---
 Master/texmf-dist/tex/latex/fontinst/fontdoc.sty | 26 ++++++++++++++++++------
 1 file changed, 20 insertions(+), 6 deletions(-)

(limited to 'Master/texmf-dist/tex/latex/fontinst/fontdoc.sty')

diff --git a/Master/texmf-dist/tex/latex/fontinst/fontdoc.sty b/Master/texmf-dist/tex/latex/fontinst/fontdoc.sty
index 0c5e4c7b325..aca36f59f7a 100644
--- a/Master/texmf-dist/tex/latex/fontinst/fontdoc.sty
+++ b/Master/texmf-dist/tex/latex/fontinst/fontdoc.sty
@@ -27,10 +27,10 @@
 %% generated.
 %% 
 %%% From file: fibasics.dtx
-\def\fontinstversion{1.927}
+\def\fontinstversion{1.929}
 \NeedsTeXFormat{LaTeX2e}[1995/06/01]
 \ProvidesPackage{fontdoc}
-[2004/08/07 v\fontinstversion\space
+[2005/02/05 v\fontinstversion\space
   fontinst documentation package]
 \newcommand*\needsfontinstversion[1]{%
    \ifFD@spec@
@@ -96,6 +96,7 @@
 \newcommand\plain{\texttt{plain}}
 \let\plainint=\int
 \let\plaindiv=\div
+\let\plainneg=\neg
 \let\plainmax=\max
 \let\plainmin=\min
 \newcount\list@item@counter
@@ -840,7 +841,6 @@
       $\TypesetIntegerExpression{#1}#2\TypesetIntegerExpression{#3}$%
    }%
 }
-
 \newcommand\setint[2]{%
    \Bheading{Default} \(\TypesetIntegerExpression{\int{#1}}\) =
    \(\TypesetIntegerExpression{#2}\)%
@@ -926,9 +926,7 @@
       \global\slot@number=0%
       \FD@slot@known@true
       \IfFileExists{\lowercase@file.etx}{%
-         \def\relax{\let\relax=\x@relax\iffalse}%
-         \let\encoding=\fi
-         \outer\x@cs\def{endencoding}{\endinput}%
+         \FD@relax@encoding@tricks
          \@@input \@filef@und
          \let\relax=\x@relax
       }{%
@@ -938,6 +936,11 @@
       }
    \endgroup
 }
+\def\FD@relax@encoding@tricks{%
+   \def\relax{\let\relax=\x@relax\iffalse}%
+   \let\encoding=\fi
+   \outer\x@cs\def{endencoding}{\endinput}%
+}
 \def\encoding{%
    \par
    \ifFD@spec@ \addvspace{\bigskipamount}\fi
@@ -1104,6 +1107,17 @@
 }
 \providecommand*\FD@codepoint[1]{\texttt{U+\uppercase{#1}}}
 \providecommand*\FD@charname[1]{\textsc{\lowercase{#1}}}
+\newcommand\charseq[1]{%
+   \comment{Unicode character sequence:}%
+   \begin{IfBranch}%
+      \def\Unicode##1##2{%
+         \noindent\FD@codepoint{##1}
+         \ifx\par##2\par\else(\FD@charname{##2})\fi
+         \par
+      }%
+      #1%
+   \end{IfBranch}%
+}
 \def\varchar{\Bheading{Extensible glyph:}}
 \def\vartop#1{\Bheading{Top} \typeset@glyph{#1}}
 \def\varmid#1{\Bheading{Middle} \typeset@glyph{#1}}
-- 
cgit v1.2.3

