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/standalone | |
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/standalone')
-rwxr-xr-x | perl-install/standalone/drakfont | 2 |
1 files changed, 1 insertions, 1 deletions
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; } |