--- deliantra/Deliantra-Client/DC.pm	2008/03/30 04:59:41	1.177
+++ deliantra/Deliantra-Client/DC.pm	2008/03/30 06:05:52	1.178
@@ -17,7 +17,7 @@
 use Carp ();
 
 BEGIN {
-   $VERSION = '0.9969';
+   $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;