[usocket-cvs] r137 - usocket/branches/0.2.x/backend

Author: ehuelsmann Date: Wed Jan 3 15:35:28 2007 New Revision: 137

Modified: usocket/branches/0.2.x/backend/sbcl.lisp Log: Backport r132 SBCL fix.

Modified: usocket/branches/0.2.x/backend/sbcl.lisp ============================================================================== --- usocket/branches/0.2.x/backend/sbcl.lisp (original) +++ usocket/branches/0.2.x/backend/sbcl.lisp Wed Jan 3 15:35:28 2007 @@ -63,7 +63,7 @@ usock-cond))) (if usock-cond (signal usock-cond :socket socket) - (signal 'unkown-condition + (signal 'unknown-condition :real-condition condition))))))