diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-01-12 11:52:17 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-01-12 11:52:17 +0000 |
| commit | 0be33a8ce982411a35eb745100b44cad63dc5da9 (patch) | |
| tree | 3cc9d220b4f9ef0e30c91c9c84e4bea87a57b001 /perl-install | |
| parent | 3abbaff18aa5575da74e6444facb31d3644cb6ee (diff) | |
| download | drakx-0be33a8ce982411a35eb745100b44cad63dc5da9.tar drakx-0be33a8ce982411a35eb745100b44cad63dc5da9.tar.gz drakx-0be33a8ce982411a35eb745100b44cad63dc5da9.tar.bz2 drakx-0be33a8ce982411a35eb745100b44cad63dc5da9.tar.xz drakx-0be33a8ce982411a35eb745100b44cad63dc5da9.zip | |
make font removing working with --testing
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/drakfont | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont index 3e6e10935..fa93ef4e7 100755 --- a/perl-install/standalone/drakfont +++ b/perl-install/standalone/drakfont @@ -279,6 +279,7 @@ sub print_list() { } sub dir_created() { + return if $::testing; -e $drakfont_dir or mkdir_p($drakfont_dir); -e $drakfont_dir . "/Type1" or mkdir_p($drakfont_dir . "/Type1"); -e $drakfont_dir . "/ttf" or mkdir_p($drakfont_dir . "/ttf"); @@ -391,7 +392,7 @@ sub remove_gs_fonts() { sub remove_fonts() { my @list_dir; - -e $drakfont_dir . "/remove" or mkdir_p($drakfont_dir . "/remove"); + -e $drakfont_dir . "/remove" or mkdir_p($drakfont_dir . "/remove") if !$::testing; interactive_progress($pbar, 1, N("done")); foreach my $i (@font_list) { @@ -399,6 +400,7 @@ sub remove_fonts() { if (/.pfb$/ || /.gsf$/ || /.pfm$/ || /.pfa$/) { system("mv $_ $drakfont_dir/remove "); } else { + next if $::testing; if (/.ttf$/) { rm_rf($_); # rebuild of the fonts.dir and fc-cache files @@ -422,7 +424,7 @@ sub remove_fonts() { interactive_progress($pbar2, 0.01, N("xfs restart")); system("/etc/rc.d/init.d/xfs restart"); system('xset fp rehash'); - -e "/usr/share/ghostscript" and rm_rf("$drakfont_dir/remove"); + -e "/usr/share/ghostscript" and rm_rf("$drakfont_dir/remove") if !$::testing; interactive_progress($pbar2, 0.01, N("done")); } |