From 7e5672eb837597a08dc886dc022f704be9b97665 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 24 Jul 2001 10:23:21 +0000
Subject: generalize the use of chomp_ as the functional alternative to chomp
 (and works on lists)

---
 perl-install/bootlook.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

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

diff --git a/perl-install/bootlook.pm b/perl-install/bootlook.pm
index a8c5f693c..4a75f24db 100644
--- a/perl-install/bootlook.pm
+++ b/perl-install/bootlook.pm
@@ -54,8 +54,7 @@ my $a_mode = (-e "/etc/aurora/Monitor") ? 1 : 0;
 my $l_mode = isAutologin();
 my %auto_mode = get_autologin("");
 my $inmain = 0;
-my $lilogrub = `detectloader -q`;
-chomp $lilogrub;
+my $lilogrub = chomp_(`detectloader -q`);
 
 my $window = $::isEmbedded ? new Gtk::Plug ($::XID) : new Gtk::Window ("toplevel");
 $window->signal_connect(delete_event => sub { $::isEmbedded ? kill(USR1, $::CCPID) : Gtk->exit(0) });
-- 
cgit v1.2.1