Fix config path detection for install.pl.

Make use of $Path - which is set and checked
to display a correct 'newsfeeds' example - to
load our configuration from the correct location.

Signed-off-by: Thomas Hochstein <thh@inter.net>

diff --git a/install/install.pl b/install/install.pl
index 374d74b..4069bf5 100755 (executable)
--- a/install/install.pl
+++ b/install/install.pl
@@ -36,12 +36,12 @@ GetOptions ('u|update=s' => \$OptUpdate,
             'V|version'  => \&ShowVersion) or exit 1;
 
 ### change working directory to .. (as we're in .../install)
             'V|version'  => \&ShowVersion) or exit 1;
 
 ### change working directory to .. (as we're in .../install)

-chdir dirname($0).'/..';
+chdir dirname($FullPath).'/..';

 my $Path = cwd();
 
 ### read configuration
 print("Reading configuration.\n");
 my $Path = cwd();
 
 ### read configuration
 print("Reading configuration.\n");

-my %Conf = %{ReadConfig($HomePath.'/newsstats.conf')};
+my %Conf = %{ReadConfig($Path.'/newsstats.conf')};

 
 ##### --------------------------------------------------------------------------
 ##### Database table definitions
 
 ##### --------------------------------------------------------------------------
 ##### Database table definitions