From ef8cdfda215d9147ae08571d04c60fcbea3c6753 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 20 Jul 2004 01:49:41 +0000
Subject: remove debugging code

---
 perl-install/bootloader.pm | 2 --
 1 file changed, 2 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 5bd8ad18a..62ae0e16e 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -1107,9 +1107,7 @@ sub write_grub {
     write_grub_device_map(\@legacy_floppies, \@sorted_hds);
 
     my $file2grub = sub {
-	warn "file2grub: fstab is ", join(' ', map { "$_->{device}:$_->{mntpoint}" } @$fstab), "\n";
 	my ($part, $file) = fsedit::file2part($fstab, $_[0], 'keep_simple_symlinks');
-	warn "file2grub: $part->{device}:$file\n";
 	device2grub($part, \@sorted_hds) . $file;
     };
     {
-- 
cgit v1.2.1