Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Fix LOOKUP-INTERFACE

  • Loading branch information...
commit 70923270240df23c51b39d0499ebb669eec4c097 1 parent dccb292
@sionescu authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  src/sockets/iface.lisp
View
2  src/sockets/iface.lisp
@@ -63,6 +63,6 @@
signalled if an interface is not found."
(check-type interface (or unsigned-byte string symbol) "non-negative integer, a string or a symbol")
(let ((parsed (ensure-string-or-unsigned-byte interface :errorp t)))
- (typecase interface
+ (typecase parsed
(unsigned-byte (get-interface-by-index parsed))
(string (get-interface-by-name parsed)))))
Please sign in to comment.
Something went wrong with that request. Please try again.