From 0812bf6439d6b36d40fef041267250a890fb197b Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 5 Jul 2004 01:54:43 +0000
Subject: oops, revert debugging code

---
 perl-install/bootloader.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 56650468b..79bac0740 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -1171,7 +1171,7 @@ sub write_grub {
 	}
 	my $f = "$::prefix/boot/grub/menu.lst";
 	log::l("writing grub config to $f");
-	output("/tmp$f", map { "$_\n" } @conf);
+	output($f, map { "$_\n" } @conf);
     }
     my $dev = device_string2grub($bootloader->{boot}, \@legacy_floppies, \@sorted_hds);
     my ($stage1, $stage2, $menu_lst) = map { $file2grub->("/boot/grub/$_") } qw(stage1 stage2 menu.lst);
-- 
cgit v1.2.1