From 104207a9c0af17d2fb4b0c510ec0d3de9cc04b4b Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Wed, 21 Mar 2007 15:09:43 +0000
Subject: handle root directory not being /root

---
 rpmdrake.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'rpmdrake.pm')

diff --git a/rpmdrake.pm b/rpmdrake.pm
index 1fa71386..429c328e 100644
--- a/rpmdrake.pm
+++ b/rpmdrake.pm
@@ -150,8 +150,8 @@ sub myexit {
     ugtk2::exit(undef, @_);
 }
 
-$ENV{HOME} = '/root' if $> == 0;
-$ENV{HOME} ||= '/root';
+my ($root) = grep { $_->[2] == 0 } list_passwd();
+$ENV{HOME} = $> == 0 ? $root->[7] : $ENV{HOME} || '/root';
 
 our $configfile = "$ENV{HOME}/.rpmdrake";
 our ($already_splashed, $changelog_first_config, $max_info_in_descr, $tree_flat, $tree_mode);
-- 
cgit v1.2.1