From 62a2463c306d124eb012015a64283feabdece84d Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 14 Sep 2009 20:08:30 +0000 Subject: fix check for missing help (it's a directory path if help cannot be found) --- perl-install/NEWS | 3 +++ perl-install/standalone/drakhelp | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/NEWS b/perl-install/NEWS index ee43447e4..8b0e3f2e8 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,6 @@ +- drakhelp + o fix check for missing help + Version 12.51 - 8 September 2009 - display_help diff --git a/perl-install/standalone/drakhelp b/perl-install/standalone/drakhelp index eea4644bd..8117d5b7b 100755 --- a/perl-install/standalone/drakhelp +++ b/perl-install/standalone/drakhelp @@ -43,7 +43,7 @@ if (! -e $instpath) { } } -if (-e $instpath) { +if (-f $instpath) { local $ENV{HOME} = '/root' if !$<; run_program::raw({ detach => 1 }, 'display_help', "file://$ancpath"); } else { -- cgit v1.2.1