Fix config path detection for install.pl.

install.pl is located in .../install, so replace
this component in $HomePath with '.' and change
'..' to '.' as configuration is located in .../.

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

diff --git a/install/install.pl b/install/install.pl
index 374d74b..0787805 100755 (executable)
--- a/install/install.pl
+++ b/install/install.pl
@@ -40,6 +40,8 @@ chdir dirname($0).'/..';
 my $Path = cwd();
 
 ### read configuration
+$HomePath = '..' if ($HomePath eq '.');
+$HomePath =~ s/install/./;
 print("Reading configuration.\n");
 my %Conf = %{ReadConfig($HomePath.'/newsstats.conf')};