Cosmetic change
authorStelian Ionescu <sionescu@cddr.org>
Sun, 5 May 2013 10:47:35 +0000 (5 12:47 +0200)
committerStelian Ionescu <sionescu@cddr.org>
Sun, 5 May 2013 10:47:35 +0000 (5 12:47 +0200)
src/sockets/make-socket.lisp

index f273a06..d6f224a 100644 (file)
@@ -273,7 +273,7 @@ call CLOSE with :ABORT T on `VAR'."
 
 #-linux
 (define-socket-creator (:netlink :raw)
-    (family protocol &key (local-port 0) (multicast-groups 0))
+    (family protocol &key local-port multicast-groups)
   (declare (ignore family protocol local-port multicast-groups))
   (error 'socket-address-family-not-supported-error))
 \f