[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
latest finst nits
- To: s.rahtz@elsevier.co.uk
- Subject: latest finst nits
- From: Ulrik Vieth <vieth@thphy.uni-duesseldorf.de>
- Date: Tue, 2 Jun 1998 12:29:40 +0200
I just looked at your latest finst distribution from CTAN and found a few
minor nits:
1. I suppose it's unnecessary to distribute "uv.patch1" and "uv.patch2".
2. There's an empty file "makemtm.pl", presumably created by a typo
when you meant to touch "makemptm.pl".
3. There's an unused file "x.tex" in the "mathptm" subdirectory, which
seems to be an obsolete version of "fontptcm.tex". Delete it?
4. There's a bug in "famtool.pl" which leads to incorrect ot1famx.fd
for expert fonts. See the patch below.
Cheers, Ulrik.
P.S. Last weekend I embarked on another hacking project, namely to
combine fontdoc.sty, fontinst.{sty,ini} and textcomp.tex in a single
fontinst.dtx source, which allows better documentation and selectively
including or leaving portions of the code. I'm not quite finished
yet, and I want to do some tests first, but it should be ready soon.
P.P.S. I'm looking into integrating the \textcompfamily installation
into \latinfamily for simplicity. All I need to add is a little hack
to skip the installation of TS1 in small-caps. What dou you think?
P.P.P.S. If you don't mind, I'd also like to include some hacks to
support a slightly simplified syntax in .etx files, namely treating
\setslot{glyph}[comment]\endsetslot
equivalent to
\setslot{glyph}\comment{commentary}\endsetslot
We've used that a lot in the new math fonts, and it would be simply
convenient to have it in the standard fontinst distribution.
*** famtool.pl.orig Fri May 22 00:28:20 1998
--- famtool.pl Tue Jun 2 12:14:12 1998
***************
*** 379,386 ****
if (/sub /) { s/Lucida//; }
}
if (/endinput/ && $encoding eq "ot1" ) {
! print NEWFD "\\DeclareFontShape{OT1}{$Famcode$opt_expert$famextra}{m}{ui}{<->ssub * $Famcode$famextra/m/it}{}\n";
! print NEWFD "\\DeclareFontShape{OT1}{$Famcode$opt_expert$famextra}{b}{ui}{<->ssub * $Famcode$famextra/b/it}{}\n";
print NEWFD "\\endinput\n";
}
else { print NEWFD ; }
--- 379,386 ----
if (/sub /) { s/Lucida//; }
}
if (/endinput/ && $encoding eq "ot1" ) {
! print NEWFD "\\DeclareFontShape{OT1}{$Famcode$opt_expert$famextra}{m}{ui}{<->ssub * $Famcode$opt_expert$famextra/m/it}{}\n";
! print NEWFD "\\DeclareFontShape{OT1}{$Famcode$opt_expert$famextra}{b}{ui}{<->ssub * $Famcode$opt_expert$famextra/b/it}{}\n";
print NEWFD "\\endinput\n";
}
else { print NEWFD ; }