From 679bd2a0a43ed5de42988e7f31c768f7f15ad9ef Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Aur=C3=A9lien=20Lefebvre?= <alefebvre@mandriva.com>
Date: Mon, 17 Aug 2009 13:46:12 +0000
Subject: - drakhelp: fix firefox launch bug #29775

---
 perl-install/NEWS                | 2 ++
 perl-install/standalone/drakhelp | 2 +-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/perl-install/NEWS b/perl-install/NEWS
index 3a1c3d5de..9ddd6fa03 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,5 @@
+- drakhelp:
+  o fix firefox launch bug #29775
 - diskdrake:
   o lookup for Samba master browsers too
 
diff --git a/perl-install/standalone/drakhelp b/perl-install/standalone/drakhelp
index 3eaf580cc..9f23a0353 100755
--- a/perl-install/standalone/drakhelp
+++ b/perl-install/standalone/drakhelp
@@ -44,7 +44,7 @@ if (! -e $instpath) {
 }
 
 if (-e $instpath) {
-    local $ENV{HOME} = '/root';
+    local $ENV{HOME} = '/root' if !$<;
     run_program::raw({ detach => 1 }, '/usr/bin/www-browser', "file://$ancpath");
 } else {
     $ugtk2::wm_icon = "help";
-- 
cgit v1.2.1