--- deliantra/Deliantra-Client/DC.pm	2009/01/11 22:11:23	1.202
+++ deliantra/Deliantra-Client/DC.pm	2012/01/07 15:24:41	1.213
@@ -19,7 +19,7 @@
 our $VERSION;
 
 BEGIN {
-   $VERSION = '2.02';
+   $VERSION = '3.0';
 
    use XSLoader;
    XSLoader::load "Deliantra::Client", $VERSION;
@@ -38,6 +38,12 @@
 use JSON::XS qw(encode_json decode_json);
 use Guard qw(guard);
 
+# modules to support other DC::* packages
+use List::Util ();
+use IO::AIO ();
+use Coro::AIO ();
+use AnyEvent::AIO ();
+
 =item shorten $string[, $maxlength]
 
 =cut
@@ -143,7 +149,7 @@
 
    for (@RC_PATH, "") {
       $path = "$RC_BASE/$_/$_[0]";
-      return $path if -r $path;
+      return $path if -e $path;
    }
 
    die "FATAL: can't find required file \"$_[0]\" in \"$RC_BASE\"\n";
@@ -156,7 +162,7 @@
       or return;
 
    local $/;
-   JSON::XS->new->utf8->relaxed->decode (<$fh>)
+   eval { JSON::XS->new->utf8->relaxed->decode (<$fh>) }
 }
 
 sub set_theme($) {