--- deliantra/Deliantra-Client/DC.pm	2008/03/20 22:28:31	1.174
+++ deliantra/Deliantra-Client/DC.pm	2008/05/05 20:22:03	1.179
@@ -17,7 +17,7 @@
 use Carp ();
 
 BEGIN {
-   $VERSION = '0.9966';
+   $VERSION = '0.9971';
 
    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;