git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
font: mark 16th column
[sheet.git]
/
tools
/
mkttfinfo
diff --git
a/tools/mkttfinfo
b/tools/mkttfinfo
index c80f5fceb378ab9a75550c422a36b2ab3afbc4de..9102726bda29bb93d28bbc4170b9dc12dcd15701 100755
(executable)
--- a/
tools/mkttfinfo
+++ b/
tools/mkttfinfo
@@
-9,14
+9,14
@@
use Getopt::Long;
our $VERSION = '1.00';
our $VERSION = '1.00';
-GetOptions(my %opt,
+GetOptions(
\
my %opt,
'verbose|v!',
);
my ($ttfuri, $outfile) = @ARGV;
$ttfuri or die "usage error\n";
'verbose|v!',
);
my ($ttfuri, $outfile) = @ARGV;
$ttfuri or die "usage error\n";
-my $fontinc = $ENV{FONTINC} // '~/.fonts,/usr/share/fonts/truetype/*';
+my $fontinc = $ENV{FONTINC} // '
data/font,
~/.fonts,/usr/share/fonts/truetype/*';
if (!-e $ttfuri) {
my $found = (grep {-e} glob "{$fontinc}/$ttfuri")[0] or do {
warn "font not found: $ttfuri\n";
if (!-e $ttfuri) {
my $found = (grep {-e} glob "{$fontinc}/$ttfuri")[0] or do {
warn "font not found: $ttfuri\n";