[cl-irc-cvs] r213 - trunk

[ehuelsmann at common-lisp.net]

Author: ehuelsmann
Date: Sat Aug 18 14:19:25 2012
New Revision: 213

Log:
Correct spelling error.

Patch submitted by Daniel Lowe.

Modified:
   trunk/protocol.lisp

Modified: trunk/protocol.lisp
==============================================================================
--- trunk/protocol.lisp	Mon Mar  9 15:32:32 2009	(r212)
+++ trunk/protocol.lisp	Sat Aug 18 14:19:25 2012	(r213)
@@ -339,7 +339,7 @@
                         (declare (ignore c))
                         (invoke-restart 'continue))))
                 (read-message-loop connection)))))
-    (let ((name (format nil "irc-hander-~D" (incf *process-count*))))
+    (let ((name (format nil "irc-handler-~D" (incf *process-count*))))
       (start-process #'do-loop name))))
 
 (defun stop-background-message-handler (process)