From cf28f8dc58c855261ceb624dab6bbab642887daf Mon Sep 17 00:00:00 2001 From: Peter Palfrader Date: Mon, 5 Aug 2002 17:46:17 +0000 Subject: Actually use the sane basedir --- Echolot/Config.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Echolot') diff --git a/Echolot/Config.pm b/Echolot/Config.pm index 8cb5237..9d818f9 100644 --- a/Echolot/Config.pm +++ b/Echolot/Config.pm @@ -1,7 +1,7 @@ package Echolot::Config; # (c) 2002 Peter Palfrader -# $Id: Config.pm,v 1.33 2002/08/05 17:30:09 weasel Exp $ +# $Id: Config.pm,v 1.34 2002/08/05 17:46:17 weasel Exp $ # =pod @@ -201,7 +201,7 @@ sub init($) { for my $key (keys %$DEFAULT) { $CONFIG->{$key} = $DEFAULT->{$key} unless defined $CONFIG->{$key}; }; - $CONFIG->{'basedir'} = $params->{'basedir'} unless (defined $CONFIG->{'verbose'}); + $CONFIG->{'homedir'} = $params->{'basedir'} unless (defined $CONFIG->{'homedir'}); $CONFIG->{'verbose'} = $params->{'verbose'} if ($params->{'verbose'}); for my $key (keys %$CONFIG) { -- cgit v1.2.3