--- deliantra/Deliantra-Client/DC.pm 2009/01/11 22:16:09 1.203 +++ deliantra/Deliantra-Client/DC.pm 2012/01/04 11:23:23 1.212 @@ -19,7 +19,7 @@ our $VERSION; BEGIN { - $VERSION = '2.02'; + $VERSION = '2.11'; 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";