From b8a801583778dee5b9075e938ed318d17c63a162 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 28 Aug 2001 09:38:02 +0000
Subject: security fix and various

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

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

diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 2cd02125e..df680587f 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -992,6 +992,7 @@ sub install {
 
     my %l = grep_each { $::b } %{$lilo->{methods}};
     my @rcs = map {
+	c::is_secure_file('/tmp/.error') or die "can't ensure a safe /tmp/.error";
 	my $f = $bootloader::{"install_$_"} or die "unknown bootloader method $_";
 	eval { $f->(@_) };
 	$@;
-- 
cgit v1.2.1