Update of /project/net-nittin-irc/cvsroot/net-nittin-irc In directory common-lisp.net:/tmp/cvs-serv4704

Modified Files: protocol.lisp Log Message: con -> connection typo

Date: Mon Nov 3 12:25:48 2003 Author: eenge

Index: net-nittin-irc/protocol.lisp diff -u net-nittin-irc/protocol.lisp:1.1.1.1 net-nittin-irc/protocol.lisp:1.2 --- net-nittin-irc/protocol.lisp:1.1.1.1 Mon Nov 3 12:00:54 2003 +++ net-nittin-irc/protocol.lisp Mon Nov 3 12:25:48 2003 @@ -1,4 +1,4 @@ -;;;; $Id: protocol.lisp,v 1.1.1.1 2003/11/03 17:00:54 eenge Exp $ +;;;; $Id: protocol.lisp,v 1.2 2003/11/03 17:25:48 eenge Exp $ ;;;; $Source: /project/net-nittin-irc/cvsroot/net-nittin-irc/protocol.lisp,v $

;;;; See LICENSE for licensing information. @@ -119,7 +119,7 @@ raw-message))

(defmethod all-users ((connection connection)) - (let ((user-list (dangling-users con))) + (let ((user-list (dangling-users connection))) (dolist (channel (channels connection)) (maphash #'(lambda (key value) (declare (ignore key))