Fix config path detection for install.pl.

[usenet/newsstats.git] / install / install.pl

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')};