From b360535ff274a20ac7f958132859bc6525e662f8 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 12 Jan 2000 12:28:01 +0000
Subject: no_comment

---
 perl-install/install_any.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'perl-install/install_any.pm')

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};
-- 
cgit v1.2.1