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

Modified Files: protocol.lisp Log Message: fix typo in function name Date: Thu Dec 18 14:43:09 2003 Author: krosenberg

Index: net-nittin-irc/protocol.lisp diff -u net-nittin-irc/protocol.lisp:1.31 net-nittin-irc/protocol.lisp:1.32 --- net-nittin-irc/protocol.lisp:1.31 Thu Dec 18 14:28:29 2003 +++ net-nittin-irc/protocol.lisp Thu Dec 18 14:43:08 2003 @@ -1,4 +1,4 @@ -;;;; $Id: protocol.lisp,v 1.31 2003/12/18 19:28:29 krosenberg Exp $ +;;;; $Id: protocol.lisp,v 1.32 2003/12/18 19:43:08 krosenberg Exp $ ;;;; $Source: /project/net-nittin-irc/cvsroot/net-nittin-irc/protocol.lisp,v $

;;;; See LICENSE for licensing information. @@ -137,7 +137,7 @@ (declare (ignore fd)) (read-message connection))))))

-(defun stop-backgound-message-handler (process) +(defun stop-background-message-handler (process) "Stops a background message handler process returned by the start function." #+cmu (mp:destroy-process process) #+allegro (mp:process-kill process)