summaryrefslogtreecommitdiffstats
path: root/perl-install/install_any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-01-12 12:28:01 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-01-12 12:28:01 +0000
commitb360535ff274a20ac7f958132859bc6525e662f8 (patch)
tree88f5793154facfe847bc3cc4952acd9031e0b396 /perl-install/install_any.pm
parente29fda8babb4dd6c1f3fe431985d5aba29b3210c (diff)
downloaddrakx-b360535ff274a20ac7f958132859bc6525e662f8.tar
drakx-b360535ff274a20ac7f958132859bc6525e662f8.tar.gz
drakx-b360535ff274a20ac7f958132859bc6525e662f8.tar.bz2
drakx-b360535ff274a20ac7f958132859bc6525e662f8.tar.xz
drakx-b360535ff274a20ac7f958132859bc6525e662f8.zip
no_comment
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r--perl-install/install_any.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 72a442c3f..ae74d7cea 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -109,7 +109,7 @@ sub getAvailableSpace {
do { $_->{mntpoint} eq '/' and return int($_->{size} * 512 / 1.07) } foreach @{$o->{fstab}};
if ($::testing) {
- my $nb = 350;
+ my $nb = 1350;
log::l("taking ${nb}MB for testing");
return $nb << 20;
}
@@ -661,8 +661,10 @@ sub kdeicons_postinstall($) {
my @l = map { "$prefix$_/Desktop/Doc.kdelnk" } list_skels();
if (my ($lang) = eval { all("$prefix/usr/doc/mandrake") }) {
substInFile { s|^(URL=.*?)/?$|$1/$lang| } @l;
+ substInFile { s|^(url=/usr/doc/mandrake/)$|$1$lang| } "$prefix/usr/lib/desktop-links/mandrake.links";
} else {
unlink @l;
+ substInFile { $_ = '' if /^\[MDKsupport\]$/ .. /^\s*$/ } "$prefix/usr/lib/desktop-links/mandrake.links";
}
my $lang = quotemeta $ENV{LANG};