From 12bee50e28f9d6523c62f90b537419c48aba1b74 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 13 Sep 2001 18:33:21 +0000
Subject: (inspect): use a safer dir when standalone

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

(limited to 'perl-install')

diff --git a/perl-install/any.pm b/perl-install/any.pm
index e6660cfb7..a26666ae9 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -374,7 +374,7 @@ sub inspect {
 
     isMountableRW($part) or return;
 
-    my $dir = "/tmp/inspect_tmp_dir";
+    my $dir = $::isInstall ? "/tmp/inspect_tmp_dir" : "/root/.inspect_tmp_dir";
 
     if ($part->{isMounted}) {
 	$dir = ($prefix || '') . $part->{mntpoint};
-- 
cgit v1.2.1