diff options
author | Karl Berry <karl@freefriends.org> | 2008-09-29 00:11:18 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2008-09-29 00:11:18 +0000 |
commit | 03e895528bdcda911fdf41b8e1da264aef4516d5 (patch) | |
tree | a9fdaa65771f5c02008b28b33b3eb861cbdcd869 /Master/texmf-dist/tex/fontinst/base/xfntinst.sty | |
parent | 9ab8b11d71a0b50e015a4385a7c8b9a1edebc4a4 (diff) |
fontinst 1.929 (28sep08)
git-svn-id: svn://tug.org/texlive/trunk@10781 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/fontinst/base/xfntinst.sty')
-rw-r--r-- | Master/texmf-dist/tex/fontinst/base/xfntinst.sty | 33 |
1 files changed, 27 insertions, 6 deletions
diff --git a/Master/texmf-dist/tex/fontinst/base/xfntinst.sty b/Master/texmf-dist/tex/fontinst/base/xfntinst.sty index c499ee37b4e..c969deab6b3 100644 --- a/Master/texmf-dist/tex/fontinst/base/xfntinst.sty +++ b/Master/texmf-dist/tex/fontinst/base/xfntinst.sty @@ -32,13 +32,13 @@ \catcode`\}=2 \catcode`\#=6 \catcode`\^=7 -\def\fontinstversion{1.927} +\def\fontinstversion{1.929} \ifx\ProvidesPackage\undefined \def\NeedsTeXFormat#1{} \def\ProvidesPackage#1[#2]{} \fi \ProvidesPackage{fontinst} -[2004/08/07 v\fontinstversion\space +[2005/02/05 v\fontinstversion\space fontinst installation package] \def\a_macro#1{\catcode\number`#1=\the\catcode`#1 } \edef\normalcc{% @@ -363,6 +363,27 @@ \catcode`\t=12 \gdef\lose_measure#1pt{#1} } +\def\format_hex_i#1#2{ + \if #2i \else + \b_count=\a_count + \divide \a_count \sixt@@n + \c_count=\a_count + \multiply \c_count \sixt@@n + \advance \b_count -\c_count + \edef#1{ + \ifcase\b_count 0\or 1\or 2\or 3\or 4\or 5\or 6\or 7\or 8\or + 9\or a\or b\or c\or d\or e\or f\fi + #1 + } + \expandafter\format_hex_i \expandafter#1 + \fi +} +\def\format_hex#1#2#3{ + \a_count=#2 + \let#1\empty_command + \expandafter\format_hex_i \expandafter#1 \romannumeral + \expandafter\identity_one\expandafter{\number#3}001~ +} \let\messagebreak\x_relax \def\generic_info#1#2{ \begingroup @@ -547,7 +568,6 @@ \expandafter\if_false \fi } - \let\setsomething_global=\x_relax \def\x_setint#1#2{ \x_cs\ifx{i-#1}\x_relax @@ -736,6 +756,7 @@ \let\usedas=\gobble_two \let\makerightboundary=\gobble_one \let\Unicode=\gobble_two +\let\charseq=\gobble_one \let\varchar=\empty_command \let\vartop=\gobble_one \let\varmid=\gobble_one @@ -1793,7 +1814,7 @@ \inputmtx{\str{afm-name}} \else \fontinsterror{\string\install...}{ - Font/MTX~file~\file_name\space not found + Font/MTX~file~\file_name\space not~found }{ You~can~insert~an~\string\inputmtx\space command~here \messagebreak to~input~some~other~MTX~file~instead. @@ -1805,7 +1826,7 @@ \fi } \def\metrics_given_encoding#1#2{ - \x_setstr{afm-name}{#1-#2} + \x_cs\edef{s-afm-name}{#1-#2} \if_file_exists{#1.pl}\then \generalpltomtx{#1}{#1-#2}{pl}{#2} \else @@ -2499,7 +2520,7 @@ \out_line{} \out_line{(COMMENT~This~file~can~be~turned~into~ a~ligless~TeX~font~with)} - \out_line{(COMMENT~pltotfm~#2.pl~#2.tfm)} + \out_line{(COMMENT~pltotf~#2.pl~#2.tfm)} \out_line{} \out_line{(COMMENT~THIS~FILE~CAN~THEN~BE~DELETED.)} \out_line{} |