Fix typo
authorStelian Ionescu <sionescu@cddr.org>
Mon, 8 Jul 2013 12:16:59 +0000 (14:16 +0200)
committerStelian Ionescu <sionescu@cddr.org>
Mon, 8 Jul 2013 12:16:59 +0000 (14:16 +0200)
src/streams/gray/fd-mixin.lisp

index 1ba6081..52d35e8 100644 (file)
 ;;;; Get and Set O_NONBLOCK
 
 (defmethod fd-non-blocking ((fd-mixin dual-channel-fd-mixin))
-  (isys:fd-nonblock (fd-of fd-mixin)))
+  (isys:fd-nonblock-p (fd-of fd-mixin)))
 (defobsolete fd-non-blocking "stream FDs are now always non-blocking.")
 
 (defmethod (setf fd-non-blocking) (mode (fd-mixin dual-channel-fd-mixin))
   (check-type mode boolean "a boolean value")
-  (setf (isys:fd-nonblock (fd-of fd-mixin)) mode))
+  (setf (isys:fd-nonblock-p (fd-of fd-mixin)) mode))
 (defobsolete (setf fd-non-blocking) "stream FDs are now always non-blocking.")