summaryrefslogtreecommitdiffstats
path: root/perl-install/lang.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-08-19 23:20:19 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-08-19 23:20:19 +0000
commit528338fa75e8ceedbf17763bf5a5c094e92d0fe8 (patch)
treeeba70b060fea721ded1b6f1fb36462730f5390ee /perl-install/lang.pm
parent8c744cf3d47bf1295ced161e7ef9776a25efeeb8 (diff)
downloaddrakx-528338fa75e8ceedbf17763bf5a5c094e92d0fe8.tar
drakx-528338fa75e8ceedbf17763bf5a5c094e92d0fe8.tar.gz
drakx-528338fa75e8ceedbf17763bf5a5c094e92d0fe8.tar.bz2
drakx-528338fa75e8ceedbf17763bf5a5c094e92d0fe8.tar.xz
drakx-528338fa75e8ceedbf17763bf5a5c094e92d0fe8.zip
rename isCdNotEjectable in usingRamdisk, ensure no files are removed unless we're in ramdisk
Diffstat (limited to 'perl-install/lang.pm')
-rw-r--r--perl-install/lang.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index 053e7048c..178671070 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -487,7 +487,7 @@ sub get_x_fontset {
my $c = $charsets{$l->[1]} or return;
if (my $f = $bigfonts{$l->[1]}) {
my $dir = "/usr/X11R6/lib/X11/fonts";
- if (! -e "$dir/$f" && $::isInstall) {
+ if (! -e "$dir/$f" && $::isInstall && common::usingRamdisk()) {
unlink "$dir/$_" foreach values %bigfonts;
install_any::remove_bigseldom_used ();
install_any::getAndSaveFile ("$dir/$f");