diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-10-07 11:58:39 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-10-07 11:58:39 +0000 |
| commit | 6ea0934866fa07a8a77a1bd69d1251b4ae1ed2ab (patch) | |
| tree | 8af1293b105f01231bb87c018061bb3eb5f95a0f /perl-install | |
| parent | 7902ef3833c7825e5df86ad5678a6a41793f0a6a (diff) | |
| download | drakx-backup-do-not-use-6ea0934866fa07a8a77a1bd69d1251b4ae1ed2ab.tar drakx-backup-do-not-use-6ea0934866fa07a8a77a1bd69d1251b4ae1ed2ab.tar.gz drakx-backup-do-not-use-6ea0934866fa07a8a77a1bd69d1251b4ae1ed2ab.tar.bz2 drakx-backup-do-not-use-6ea0934866fa07a8a77a1bd69d1251b4ae1ed2ab.tar.xz drakx-backup-do-not-use-6ea0934866fa07a8a77a1bd69d1251b4ae1ed2ab.zip | |
(move_fonts) fix it
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/NEWS | 1 | ||||
| -rwxr-xr-x | perl-install/standalone/drakfont | 2 |
2 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 162f8abba..fd9efb336 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,6 +1,7 @@ - drakclock: o do not crash if timezones cannot be listed (mga#6787) - drakfont: + o fix a crash o fix ttmkfdir path Version 14.45 - 20 September 2012 diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont index 03df9aedc..68d7a0d8b 100755 --- a/perl-install/standalone/drakfont +++ b/perl-install/standalone/drakfont @@ -308,7 +308,7 @@ sub convert_ttf_fonts { sub move_fonts { my ($src_dir, $dest_dir, @extensions) = @_; my @fonts = map { s!.*/!!; $_ } map { glob("$src_dir/*.$_") } @extensions; - next if !@fonts; + return if !@fonts; system('mv', "$src_dir/$_", $dest_dir) foreach @fonts; } |