--- deliantra/Deliantra-Client/DC.pm	2007/04/06 21:53:56	1.141
+++ deliantra/Deliantra-Client/DC.pm	2007/04/16 20:35:28	1.143
@@ -232,9 +232,9 @@
 sub fh_nonblocking($$) {
    my ($fh, $nb) = @_;
 
-   if ($^O =~ /Win32/) {
-      $nb = ! ! $nb;
-      ioctl $fh, 0x8004667e, $nb; # FIONBIO
+   if ($^O eq "MSWin32") {
+      $nb = (! ! $nb) + 0;
+      ioctl $fh, 0x8004667e, \$nb; # FIONBIO
    } else {
       fcntl $fh, &Fcntl::F_SETFL, $nb ? &Fcntl::O_NONBLOCK : 0;
    }