From 4a10f63f1f161af77762eeeab60ad4b145a17b29 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 11 Aug 2009 15:53:34 +0000 Subject: (install) prevent urpmi messages from garbaging text installer (#50776) (needs urpmi > 6.26.1) --- perl-install/install/pkgs.pm | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'perl-install/install/pkgs.pm') diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm index 4d72a761e..39dc0cc7c 100644 --- a/perl-install/install/pkgs.pm +++ b/perl-install/install/pkgs.pm @@ -684,6 +684,10 @@ sub install { URPM::add_macro(join(' ', '__dbi_cdb', URPM::expand('%__dbi_cdb'), 'nofsync')); my $LOG = _openInstallLog(); + $packages->{log} = $packages->{info} = $packages->{print} = sub { + print $LOG "$_[0]\n"; + }; + #- do not modify/translate the message used with installCallback since #- these are keys during progressing installation, or change in other #- place (install::steps_gtk.pm,...). -- cgit v1.2.1