diff options
| -rwxr-xr-x | perl-install/standalone/drakfont | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont index 70a973f45..1143f7c33 100755 --- a/perl-install/standalone/drakfont +++ b/perl-install/standalone/drakfont @@ -346,7 +346,8 @@ sub put_font_dir() { if ($gs) { convert_ttf_fonts([ glob("$drakfont_dir/tmp/tmp/*.ttf") ], 1); - system(join('', "cd $drakfont_dir/tmp/tmp && mv *.gsf *.pfb *.pfm", if_($so, "*.afm"), " ../Type1")); + my @fonts = map { s@.*/@@; $_ } map { glob("$drakfont_dir/tmp/tmp/*.$_") } qw(gsf pfb pfm afm); + system("cd $drakfont_dir/tmp/tmp && mv @fonts ../Type1") if @fonts; system("cd $drakfont_dir/tmp/Type1 && $type1inst"); interactive_progress($pbar2, 0.1, N("type1inst building")); if ($so) { |