--- deliantra/Deliantra-Client/DC.pm 2008/03/20 22:28:31 1.174 +++ deliantra/Deliantra-Client/DC.pm 2008/03/30 06:05:52 1.178 @@ -17,7 +17,7 @@ use Carp (); BEGIN { - $VERSION = '0.9966'; + $VERSION = '0.9970'; use XSLoader; XSLoader::load "Deliantra::Client", $VERSION; @@ -166,7 +166,7 @@ } sub write_cfg { - my ($file) = @_; + my $file = "$Deliantra::VARDIR/client.cf"; $::CFG->{VERSION} = $::VERSION;