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>
my $Path = cwd();
### read configuration
my $Path = cwd();
### read configuration
+$HomePath = '..' if ($HomePath eq '.');
+$HomePath =~ s/install/./;
print("Reading configuration.\n");
my %Conf = %{ReadConfig($HomePath.'/newsstats.conf')};
print("Reading configuration.\n");
my %Conf = %{ReadConfig($HomePath.'/newsstats.conf')};