From ebde9467298155ef92bd6e918640ddd7f97e0243 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Sun, 27 Nov 2011 13:06:54 +0000
Subject: (secured_file) fix crashing on creating temp file if temp dir doesn't
 exist (mga#1396)

---
 perl-install/NEWS      | 1 +
 perl-install/common.pm | 1 +
 2 files changed, 2 insertions(+)

diff --git a/perl-install/NEWS b/perl-install/NEWS
index 515bb704e..72725245a 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,5 +1,6 @@
 - add wireless drivers: rtl8192se rtl8192cu rtl8192de
 - add sas/raid driver: isci
+- fix crashing on creating temp file if temp dir doesn't exist (mga#1396)
 
 Version 13.58 - 26 May 2011
 
diff --git a/perl-install/common.pm b/perl-install/common.pm
index fb42180c7..30ef121e2 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -267,6 +267,7 @@ sub open_file {
 
 sub secured_file {
     my ($f) = @_;
+    mkdir_p(dirname($f));
     c::is_secure_file($f) or die "cannot ensure a safe $f";
     $f;
 }
-- 
cgit v1.2.1