--- deliantra/Deliantra-Client/DC.pm	2007/04/06 23:25:07	1.142
+++ deliantra/Deliantra-Client/DC.pm	2007/07/02 02:58:51	1.145
@@ -17,7 +17,7 @@
 use Carp ();
 
 BEGIN {
-   $VERSION = '0.97';
+   $VERSION = '0.98';
 
    use XSLoader;
    XSLoader::load "CFPlus", $VERSION;
@@ -30,12 +30,7 @@
 use File::Path ();
 use Storable (); # finally
 use Fcntl ();
-
-BEGIN {
-   use Crossfire::Protocol::Base ();
-   *to_json   = \&Crossfire::Protocol::Base::to_json;
-   *from_json = \&Crossfire::Protocol::Base::from_json;
-}
+use JSON::XS qw(to_json from_json);
 
 =item guard { BLOCK }
 
@@ -234,7 +229,7 @@
 
    if ($^O eq "MSWin32") {
       $nb = (! ! $nb) + 0;
-      ioctl $fh, 0x8004667e, $nb; # FIONBIO
+      ioctl $fh, 0x8004667e, \$nb; # FIONBIO
    } else {
       fcntl $fh, &Fcntl::F_SETFL, $nb ? &Fcntl::O_NONBLOCK : 0;
    }