From 73664f3bb1816f30dfe94f41ea6241a9c5328114 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 20 Dec 1999 00:05:37 +0000
Subject: no_comment

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

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

diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index c2885cf26..39ee33259 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -507,6 +507,8 @@ sub install_urpmi {
 	chop, print LIST "$dir/Mandrake/RPMS/$_\n" foreach <FILES>;
 	close FILES or log::l("hdlist2files failed"), return;
 
+	run_program::run("gzip", "-9", $f);
+
 	$dir .= "/Mandrake/RPMS with ../base/hdlist" if $method =~ /ftp|http/;
 	eval { output "$prefix/etc/urpmi/urpmi.cfg", "$name $dir\n" };
     }
@@ -582,9 +584,7 @@ sub kdelang_postinstall($) {
     my %i18n = getVarsFromSh("$prefix/etc/sysconfig/i18n");
     my $lang = $i18n{LANG} eq 'se' ? 'sv' : $i18n{LANG};
 
-    update_userkderc($prefix, 'Locale', {
-					 language => "Language=$lang\n",
-					});
+    update_userkderc($prefix, 'Locale', { language => "Language=$lang\n" });
 }
 
 sub kdeicons_postinstall($) {
-- 
cgit v1.2.1