--- deliantra/Deliantra/Deliantra.pm	2007/12/26 18:05:00	1.119
+++ deliantra/Deliantra/Deliantra.pm	2007/12/26 18:26:15	1.120
@@ -6,7 +6,7 @@
 
 package Deliantra;
 
-our $VERSION = '1.13';
+our $VERSION = '1.14';
 
 use strict;
 
@@ -26,12 +26,16 @@
 
 use JSON::XS qw(decode_json encode_json);
 
-our $LIB = $ENV{CROSSFIRE_LIBDIR};
+our $LIB = $ENV{DELIANTRA_LIBDIR} || $ENV{CROSSFIRE_LIBDIR};
 
-our $VARDIR = $ENV{HOME}    ? "$ENV{HOME}/.crossfire"
+our $OLDDIR = $ENV{HOME}    ? "$ENV{HOME}/.crossfire"
             : $ENV{AppData} ? "$ENV{APPDATA}/crossfire"
             : File::Spec->tmpdir . "/crossfire";
 
+our $VARDIR = $ENV{HOME}    ? "$ENV{HOME}/.deliantra"
+            : $ENV{AppData} ? "$ENV{APPDATA}/deliantra"
+            : File::Spec->tmpdir . "/deliantra";
+
 mkdir $VARDIR, 0777;
 
 sub TILESIZE    (){ 32 }