Update of /project/net-nittin-irc/cvsroot/net-nittin-irc In directory common-lisp.net:/tmp/cvs-serv31378
Modified Files: command.lisp Log Message: calling add-default-hooks in connect
Date: Sun Nov 23 18:21:59 2003 Author: eenge
Index: net-nittin-irc/command.lisp diff -u net-nittin-irc/command.lisp:1.7 net-nittin-irc/command.lisp:1.8 --- net-nittin-irc/command.lisp:1.7 Sun Nov 23 17:39:15 2003 +++ net-nittin-irc/command.lisp Sun Nov 23 18:21:57 2003 @@ -1,4 +1,4 @@ -;;;; $Id: command.lisp,v 1.7 2003/11/23 22:39:15 eenge Exp $ +;;;; $Id: command.lisp,v 1.8 2003/11/23 23:21:57 eenge Exp $ ;;;; $Source: /project/net-nittin-irc/cvsroot/net-nittin-irc/command.lisp,v $
;;;; See LICENSE for licensing information. @@ -222,6 +222,7 @@ :server-name server))) (nick connection nickname) (user- connection (or username nickname) mode (or realname nickname)) + (add-default-hooks connection) connection))
(defmethod trace- ((connection connection) &optional (target ""))