summaryrefslogtreecommitdiffstats
path: root/perl-install/install_any.pm
diff options
context:
space:
mode:
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};