texlive[52852] trunk: fontools (19nov19)
commits+karl at tug.org
commits+karl at tug.org
Tue Nov 19 01:01:08 CET 2019
Revision: 52852
http://tug.org/svn/texlive?view=revision&revision=52852
Author: karl
Date: 2019-11-19 01:01:08 +0100 (Tue, 19 Nov 2019)
Log Message:
-----------
fontools (19nov19)
Modified Paths:
--------------
trunk/Build/source/texk/texlive/linked_scripts/fontools/afm2afm
trunk/Build/source/texk/texlive/linked_scripts/fontools/autoinst
trunk/Build/source/texk/texlive/linked_scripts/fontools/ot2kpx
trunk/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl
trunk/Master/texmf-dist/doc/man/man1/afm2afm.1
trunk/Master/texmf-dist/doc/man/man1/afm2afm.man1.pdf
trunk/Master/texmf-dist/doc/man/man1/autoinst.1
trunk/Master/texmf-dist/doc/man/man1/autoinst.man1.pdf
trunk/Master/texmf-dist/doc/man/man1/ot2kpx.1
trunk/Master/texmf-dist/doc/man/man1/ot2kpx.man1.pdf
trunk/Master/texmf-dist/doc/support/fontools/splitttc
trunk/Master/texmf-dist/scripts/fontools/afm2afm
trunk/Master/texmf-dist/scripts/fontools/autoinst
trunk/Master/texmf-dist/scripts/fontools/ot2kpx
Modified: trunk/Build/source/texk/texlive/linked_scripts/fontools/afm2afm
===================================================================
--- trunk/Build/source/texk/texlive/linked_scripts/fontools/afm2afm 2019-11-18 00:54:36 UTC (rev 52851)
+++ trunk/Build/source/texk/texlive/linked_scripts/fontools/afm2afm 2019-11-19 00:01:08 UTC (rev 52852)
@@ -37,7 +37,7 @@
use Getopt::Long;
use Pod::Usage;
-my $VERSION = "20191029";
+my $VERSION = "20191118";
parse_commandline();
@@ -421,7 +421,7 @@
=head1 VERSION
-This document describes B<afm2afm> version 20191029.
+This document describes B<afm2afm> version 20191118.
=head1 RECENT CHANGES
Modified: trunk/Build/source/texk/texlive/linked_scripts/fontools/autoinst
===================================================================
--- trunk/Build/source/texk/texlive/linked_scripts/fontools/autoinst 2019-11-18 00:54:36 UTC (rev 52851)
+++ trunk/Build/source/texk/texlive/linked_scripts/fontools/autoinst 2019-11-19 00:01:08 UTC (rev 52852)
@@ -40,7 +40,7 @@
use Pod::Usage ();
use POSIX ();
-my $VERSION = '20191029';
+my $VERSION = '20191118';
my ($d, $m, $y) = (localtime time)[3 .. 5];
my $TODAY = sprintf "%04d/%02d/%02d", $y + 1900, $m + 1, $d;
@@ -150,16 +150,16 @@
=cut
my @NFSS_WEIGHT = (
- ul => [ qw( ultralight thin hairline eight four two ) ],
- el => [ qw( extralight ) ],
- l => [ qw( light ) ],
+ ul => [ qw( ultralight thin 100 hairline eight four two ) ],
+ el => [ qw( extralight 200 ) ],
+ l => [ qw( light 300 ) ],
sl => [ qw( semilight blond ) ],
- '' => [ qw( regular text book ) ],
- sb => [ qw( semibold demibold medium ) ],
- b => [ qw( bold ) ],
- eb => [ qw( extrabold ) ],
- ub => [ qw( ultrabold black heavy extrablack ultrablack
- ultraheavy poster super ) ],
+ '' => [ qw( regular text book 400 ) ],
+ sb => [ qw( semibold demibold 600 medium 500 ) ],
+ b => [ qw( bold 700 ) ],
+ eb => [ qw( extrabold 800 ) ],
+ ub => [ qw( ultrabold black heavy extrablack ultrablack 900
+ ultraheavy poster super 1000 ) ],
);
my %NFSS_WEIGHT = @NFSS_WEIGHT;
@NFSS_WEIGHT = grep { !ref } @NFSS_WEIGHT;
@@ -709,10 +709,13 @@
# Special case: if we don't have Regular but we *do* have Medium,
# move Medium from the "sb" list to the "m" (i.e., Regular) one.
- if ( !@{$NFSS_WEIGHT{''}} and $weight{medium} ) {
- $NFSS_WEIGHT{''} = [ 'medium' ];
- $NFSS_WEIGHT{sb}
- = [ grep { $_ ne 'medium' } @{$NFSS_WEIGHT{medium}} ];
+ if ( !@{$NFSS_WEIGHT{''}} ) {
+ my $alternate = ( grep { $weight{$_} } qw(medium 500) )[0];
+ if ($alternate) {
+ $NFSS_WEIGHT{''} = [ $alternate ];
+ $NFSS_WEIGHT{sb}
+ = [ grep { $_ ne $alternate } @{$NFSS_WEIGHT{sb}} ];
+ }
}
# Some more trickery to map the sl code to Book or Text (but of course
@@ -1292,9 +1295,11 @@
END_WARNING_TARGET_UPDMAP
}
elsif (!$ARGV{target}) {
- my $kpsepath = eval {
- qx( kpsewhich -expand-var='\$TEXMFLOCAL:\$TEXMFHOME' );
- };
+ my $is_windows_os = ( $^O =~ /^MSWin/i );
+ my $kpsepath = $is_windows_os
+ ? eval { qx( kpsewhich -expand-var=\$TEXMFLOCAL;\$TEXMFHOME ) }
+ : eval { qx( kpsewhich -expand-var='\$TEXMFLOCAL:\$TEXMFHOME' ) }
+ ;
if (!$kpsepath) {
warn <<"END_WARNING_KPSEWHICH";
[WARNING] Call to "kpsewhich" failed.
@@ -1305,7 +1310,8 @@
END_WARNING_KPSEWHICH
}
else {
- for my $dir ( split m/[:;]/xms, substr $kpsepath, 0, -1 ) {
+ my $pathsep = $is_windows_os ? ';' : ':';
+ for my $dir ( split m/$pathsep/xms, substr $kpsepath, 0, -1 ) {
if (-w $dir) { $ARGV{target} = $dir; last }
if (-e $dir) { next }
my $par = File::Spec->catdir( $dir, File::Spec->updir() );
@@ -1787,6 +1793,7 @@
$fn = File::Spec->catfile($dir, $fn);
open my $STY, '>', $fn
or die "[ERROR] Can't create '$fn': $!";
+ binmode $STY;
print {$STY} <<"END_STY_HEADER";
%% Generated by autoinst on $TODAY
@@ -1995,6 +2002,7 @@
$fn = File::Spec->catfile($dir, $fn);
open my $FD, '>', $fn
or die "[ERROR] Can't create '$fn': $!";
+ binmode $FD;
print {$FD} <<"END_FD_HEADER";
%% Generated by autoinst on $TODAY
@@ -2825,7 +2833,7 @@
=head1 VERSION
-This document describes B<autoinst> version 20191029.
+This document describes B<autoinst> version 20191118.
=head1 RECENT CHANGES
@@ -2834,6 +2842,11 @@
=over 12
+=item I<2019-11-18>
+
+Fine-tuned calling of F<kpsewhich> on Windows (patch by Akira Kakuto).
+The font info parsing now also recognises numerical weights, e.g. in Museo.
+
=item I<2019-10-29>
The generated style files now use T1 as the default text encoding.
Modified: trunk/Build/source/texk/texlive/linked_scripts/fontools/ot2kpx
===================================================================
--- trunk/Build/source/texk/texlive/linked_scripts/fontools/ot2kpx 2019-11-18 00:54:36 UTC (rev 52851)
+++ trunk/Build/source/texk/texlive/linked_scripts/fontools/ot2kpx 2019-11-19 00:01:08 UTC (rev 52852)
@@ -38,7 +38,7 @@
use List::Util @List::Util::EXPORT_OK;
use Pod::Usage;
-my $VERSION = "20191029";
+my $VERSION = "20191118";
our ($NUM_GLYPHS, $UNITS_PER_EM, %kern);
@@ -858,7 +858,7 @@
=head1 VERSION
-This document describes B<ot2kpx> version 20191029.
+This document describes B<ot2kpx> version 20191118.
=head1 RECENT CHANGES
Modified: trunk/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl
===================================================================
--- trunk/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl 2019-11-18 00:54:36 UTC (rev 52851)
+++ trunk/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl 2019-11-19 00:01:08 UTC (rev 52852)
@@ -1,12 +1,12 @@
#!/usr/bin/env perl
-# $Id: tlmgr.pl 52830 2019-11-17 17:05:39Z karl $
+# $Id: tlmgr.pl 52848 2019-11-17 22:43:11Z karl $
#
# Copyright 2008-2019 Norbert Preining
# This file is licensed under the GNU General Public License version 2
# or any later version.
-my $svnrev = '$Revision: 52830 $';
-my $datrev = '$Date: 2019-11-17 18:05:39 +0100 (Sun, 17 Nov 2019) $';
+my $svnrev = '$Revision: 52848 $';
+my $datrev = '$Date: 2019-11-17 23:43:11 +0100 (Sun, 17 Nov 2019) $';
my $tlmgrrevision;
my $tlmgrversion;
my $prg;
@@ -9076,7 +9076,7 @@
tlmgr remove --force foobar
Again, since packages are sometimes renamed or replaced, using this
-option is not ecommended.
+option is not recommended.
=item B<--reinstall-forcibly-removed>
@@ -9952,7 +9952,7 @@
distribution (L<https://tug.org/texlive>) and both are licensed under the
GNU General Public License Version 2 or later.
-$Id: tlmgr.pl 52830 2019-11-17 17:05:39Z karl $
+$Id: tlmgr.pl 52848 2019-11-17 22:43:11Z karl $
=cut
# test HTML version: pod2html --cachedir=/tmp tlmgr.pl >/tmp/tlmgr.html
Modified: trunk/Master/texmf-dist/doc/man/man1/afm2afm.1
===================================================================
--- trunk/Master/texmf-dist/doc/man/man1/afm2afm.1 2019-11-18 00:54:36 UTC (rev 52851)
+++ trunk/Master/texmf-dist/doc/man/man1/afm2afm.1 2019-11-19 00:01:08 UTC (rev 52852)
@@ -133,7 +133,7 @@
.\" ========================================================================
.\"
.IX Title "AFM2AFM 1"
-.TH AFM2AFM 1 "2019-10-29" "fontools" "Marc Penninga"
+.TH AFM2AFM 1 "2019-11-18" "fontools" "Marc Penninga"
.\" For nroff, turn off justification. Always turn off hyphenation; it makes
.\" way too many mistakes in technical documents.
.if n .ad l
@@ -223,7 +223,7 @@
See the \s-1GNU\s0 General Public License for more details.
.SH "VERSION"
.IX Header "VERSION"
-This document describes \fBafm2afm\fR version 20191029.
+This document describes \fBafm2afm\fR version 20191118.
.SH "RECENT CHANGES"
.IX Header "RECENT CHANGES"
(See the source code for the rest of the story.)
Modified: trunk/Master/texmf-dist/doc/man/man1/afm2afm.man1.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/doc/man/man1/autoinst.1
===================================================================
--- trunk/Master/texmf-dist/doc/man/man1/autoinst.1 2019-11-18 00:54:36 UTC (rev 52851)
+++ trunk/Master/texmf-dist/doc/man/man1/autoinst.1 2019-11-19 00:01:08 UTC (rev 52852)
@@ -133,7 +133,7 @@
.\" ========================================================================
.\"
.IX Title "AUTOINST 1"
-.TH AUTOINST 1 "2019-10-29" "fontools" "Marc Penninga"
+.TH AUTOINST 1 "2019-11-18" "fontools" "Marc Penninga"
.\" For nroff, turn off justification. Always turn off hyphenation; it makes
.\" way too many mistakes in technical documents.
.if n .ad l
@@ -741,10 +741,14 @@
\&\s-1GNU\s0 General Public License for more details.
.SH "VERSION"
.IX Header "VERSION"
-This document describes \fBautoinst\fR version 20191029.
+This document describes \fBautoinst\fR version 20191118.
.SH "RECENT CHANGES"
.IX Header "RECENT CHANGES"
(See the source for the full story, all the way back to 2005.)
+.IP "\fI2019\-11\-18\fR" 12
+.IX Item "2019-11-18"
+Fine-tuned calling of \fIkpsewhich\fR on Windows (patch by Akira Kakuto).
+The font info parsing now also recognises numerical weights, e.g. in Museo.
.IP "\fI2019\-10\-29\fR" 12
.IX Item "2019-10-29"
The generated style files now use T1 as the default text encoding.
Modified: trunk/Master/texmf-dist/doc/man/man1/autoinst.man1.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/doc/man/man1/ot2kpx.1
===================================================================
--- trunk/Master/texmf-dist/doc/man/man1/ot2kpx.1 2019-11-18 00:54:36 UTC (rev 52851)
+++ trunk/Master/texmf-dist/doc/man/man1/ot2kpx.1 2019-11-19 00:01:08 UTC (rev 52852)
@@ -133,7 +133,7 @@
.\" ========================================================================
.\"
.IX Title "OT2KPX 1"
-.TH OT2KPX 1 "2019-10-29" "fontools" "Marc Penninga"
+.TH OT2KPX 1 "2019-11-18" "fontools" "Marc Penninga"
.\" For nroff, turn off justification. Always turn off hyphenation; it makes
.\" way too many mistakes in technical documents.
.if n .ad l
@@ -228,7 +228,7 @@
See the \s-1GNU\s0 General Public License for more details.
.SH "VERSION"
.IX Header "VERSION"
-This document describes \fBot2kpx\fR version 20191029.
+This document describes \fBot2kpx\fR version 20191118.
.SH "RECENT CHANGES"
.IX Header "RECENT CHANGES"
(See the source code for the rest of the story.)
Modified: trunk/Master/texmf-dist/doc/man/man1/ot2kpx.man1.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/doc/support/fontools/splitttc
===================================================================
--- trunk/Master/texmf-dist/doc/support/fontools/splitttc 2019-11-18 00:54:36 UTC (rev 52851)
+++ trunk/Master/texmf-dist/doc/support/fontools/splitttc 2019-11-19 00:01:08 UTC (rev 52852)
@@ -37,7 +37,7 @@
use Getopt::Long;
use Pod::Usage;
-my $VERSION = "20191029";
+my $VERSION = "20191118";
parse_commandline();
@@ -245,7 +245,7 @@
=head1 VERSION
-This document describes B<splitttc> version 20191029.
+This document describes B<splitttc> version 20191118.
=head1 RECENT CHANGES
Modified: trunk/Master/texmf-dist/scripts/fontools/afm2afm
===================================================================
--- trunk/Master/texmf-dist/scripts/fontools/afm2afm 2019-11-18 00:54:36 UTC (rev 52851)
+++ trunk/Master/texmf-dist/scripts/fontools/afm2afm 2019-11-19 00:01:08 UTC (rev 52852)
@@ -37,7 +37,7 @@
use Getopt::Long;
use Pod::Usage;
-my $VERSION = "20191029";
+my $VERSION = "20191118";
parse_commandline();
@@ -421,7 +421,7 @@
=head1 VERSION
-This document describes B<afm2afm> version 20191029.
+This document describes B<afm2afm> version 20191118.
=head1 RECENT CHANGES
Modified: trunk/Master/texmf-dist/scripts/fontools/autoinst
===================================================================
--- trunk/Master/texmf-dist/scripts/fontools/autoinst 2019-11-18 00:54:36 UTC (rev 52851)
+++ trunk/Master/texmf-dist/scripts/fontools/autoinst 2019-11-19 00:01:08 UTC (rev 52852)
@@ -40,7 +40,7 @@
use Pod::Usage ();
use POSIX ();
-my $VERSION = '20191029';
+my $VERSION = '20191118';
my ($d, $m, $y) = (localtime time)[3 .. 5];
my $TODAY = sprintf "%04d/%02d/%02d", $y + 1900, $m + 1, $d;
@@ -150,16 +150,16 @@
=cut
my @NFSS_WEIGHT = (
- ul => [ qw( ultralight thin hairline eight four two ) ],
- el => [ qw( extralight ) ],
- l => [ qw( light ) ],
+ ul => [ qw( ultralight thin 100 hairline eight four two ) ],
+ el => [ qw( extralight 200 ) ],
+ l => [ qw( light 300 ) ],
sl => [ qw( semilight blond ) ],
- '' => [ qw( regular text book ) ],
- sb => [ qw( semibold demibold medium ) ],
- b => [ qw( bold ) ],
- eb => [ qw( extrabold ) ],
- ub => [ qw( ultrabold black heavy extrablack ultrablack
- ultraheavy poster super ) ],
+ '' => [ qw( regular text book 400 ) ],
+ sb => [ qw( semibold demibold 600 medium 500 ) ],
+ b => [ qw( bold 700 ) ],
+ eb => [ qw( extrabold 800 ) ],
+ ub => [ qw( ultrabold black heavy extrablack ultrablack 900
+ ultraheavy poster super 1000 ) ],
);
my %NFSS_WEIGHT = @NFSS_WEIGHT;
@NFSS_WEIGHT = grep { !ref } @NFSS_WEIGHT;
@@ -709,10 +709,13 @@
# Special case: if we don't have Regular but we *do* have Medium,
# move Medium from the "sb" list to the "m" (i.e., Regular) one.
- if ( !@{$NFSS_WEIGHT{''}} and $weight{medium} ) {
- $NFSS_WEIGHT{''} = [ 'medium' ];
- $NFSS_WEIGHT{sb}
- = [ grep { $_ ne 'medium' } @{$NFSS_WEIGHT{medium}} ];
+ if ( !@{$NFSS_WEIGHT{''}} ) {
+ my $alternate = ( grep { $weight{$_} } qw(medium 500) )[0];
+ if ($alternate) {
+ $NFSS_WEIGHT{''} = [ $alternate ];
+ $NFSS_WEIGHT{sb}
+ = [ grep { $_ ne $alternate } @{$NFSS_WEIGHT{sb}} ];
+ }
}
# Some more trickery to map the sl code to Book or Text (but of course
@@ -1292,9 +1295,11 @@
END_WARNING_TARGET_UPDMAP
}
elsif (!$ARGV{target}) {
- my $kpsepath = eval {
- qx( kpsewhich -expand-var='\$TEXMFLOCAL:\$TEXMFHOME' );
- };
+ my $is_windows_os = ( $^O =~ /^MSWin/i );
+ my $kpsepath = $is_windows_os
+ ? eval { qx( kpsewhich -expand-var=\$TEXMFLOCAL;\$TEXMFHOME ) }
+ : eval { qx( kpsewhich -expand-var='\$TEXMFLOCAL:\$TEXMFHOME' ) }
+ ;
if (!$kpsepath) {
warn <<"END_WARNING_KPSEWHICH";
[WARNING] Call to "kpsewhich" failed.
@@ -1305,7 +1310,8 @@
END_WARNING_KPSEWHICH
}
else {
- for my $dir ( split m/[:;]/xms, substr $kpsepath, 0, -1 ) {
+ my $pathsep = $is_windows_os ? ';' : ':';
+ for my $dir ( split m/$pathsep/xms, substr $kpsepath, 0, -1 ) {
if (-w $dir) { $ARGV{target} = $dir; last }
if (-e $dir) { next }
my $par = File::Spec->catdir( $dir, File::Spec->updir() );
@@ -1787,6 +1793,7 @@
$fn = File::Spec->catfile($dir, $fn);
open my $STY, '>', $fn
or die "[ERROR] Can't create '$fn': $!";
+ binmode $STY;
print {$STY} <<"END_STY_HEADER";
%% Generated by autoinst on $TODAY
@@ -1995,6 +2002,7 @@
$fn = File::Spec->catfile($dir, $fn);
open my $FD, '>', $fn
or die "[ERROR] Can't create '$fn': $!";
+ binmode $FD;
print {$FD} <<"END_FD_HEADER";
%% Generated by autoinst on $TODAY
@@ -2825,7 +2833,7 @@
=head1 VERSION
-This document describes B<autoinst> version 20191029.
+This document describes B<autoinst> version 20191118.
=head1 RECENT CHANGES
@@ -2834,6 +2842,11 @@
=over 12
+=item I<2019-11-18>
+
+Fine-tuned calling of F<kpsewhich> on Windows (patch by Akira Kakuto).
+The font info parsing now also recognises numerical weights, e.g. in Museo.
+
=item I<2019-10-29>
The generated style files now use T1 as the default text encoding.
Modified: trunk/Master/texmf-dist/scripts/fontools/ot2kpx
===================================================================
--- trunk/Master/texmf-dist/scripts/fontools/ot2kpx 2019-11-18 00:54:36 UTC (rev 52851)
+++ trunk/Master/texmf-dist/scripts/fontools/ot2kpx 2019-11-19 00:01:08 UTC (rev 52852)
@@ -38,7 +38,7 @@
use List::Util @List::Util::EXPORT_OK;
use Pod::Usage;
-my $VERSION = "20191029";
+my $VERSION = "20191118";
our ($NUM_GLYPHS, $UNITS_PER_EM, %kern);
@@ -858,7 +858,7 @@
=head1 VERSION
-This document describes B<ot2kpx> version 20191029.
+This document describes B<ot2kpx> version 20191118.
=head1 RECENT CHANGES
More information about the tex-live-commits
mailing list