font: generate data for apple fonts from OS X
authorMischa POSLAWSKY <perl@shiar.org>
Sun, 22 Apr 2012 15:46:09 +0000 (17:46 +0200)
committerMischa POSLAWSKY <perl@shiar.org>
Fri, 19 Apr 2013 15:10:14 +0000 (17:10 +0200)
tools/convert-allfonts

index 9610114..5f0c6aa 100755 (executable)
@@ -10,7 +10,7 @@ chdir dirname $0;
 
 my $convbin = './mkttfinfo';
 my $outdir = '../ttfsupport';
-my @ttfpath = '~/.fonts';  # local fallbacks
+my @ttfpath = ('~/.fonts', '../data/osx-fonts');  # local fallbacks
 
 if (my $mspath = '/usr/share/fonts/truetype/msttcorefonts') {
        if (my $src = first { -e } map { glob "$_/Verdana.ttf" } $mspath, @ttfpath) {
@@ -33,6 +33,15 @@ if (my $mspath = '/usr/share/fonts/truetype/msttcorefonts') {
        }
 }
 
+if (my $ampath = '/usr/share/fonts/truetype/macfonts') {
+       if (my $src = first { -e } map { glob "$_/Lucida?Grande.ttf" } $ampath, @ttfpath) {
+               system $convbin, $src, "$outdir/lucida.inc.pl";
+       }
+       if (my $src = first { -e } map { glob "$_/AppleGaramond.ttf" } $ampath, @ttfpath) {
+               system $convbin, $src, "$outdir/garamond.inc.pl";
+       }
+}
+
 if (my $dvpath = '/usr/share/fonts/truetype/ttf-dejavu') {
        if (my $src = first { -e } map { glob "$_/DejaVuSans.ttf" } $dvpath, @ttfpath) {
                system $convbin, $src, "$outdir/dvsans.inc.pl";