Update of /project/beirc/cvsroot/beirc In directory common-lisp.net:/tmp/cvs-serv14230
Modified Files: beirc.lisp Log Message: don't display PING messages.
The *Server* buffer should only light up if something important happens, now.
Date: Sat Sep 24 20:14:28 2005 Author: afuchs
Index: beirc/beirc.lisp diff -u beirc/beirc.lisp:1.25 beirc/beirc.lisp:1.26 --- beirc/beirc.lisp:1.25 Sat Sep 24 20:13:44 2005 +++ beirc/beirc.lisp Sat Sep 24 20:14:28 2005 @@ -212,7 +212,8 @@ cl-irc:irc-rpl_endofinfo-message cl-irc:irc-rpl_endofstats-message cl-irc:irc-rpl_endofwho-message - cl-irc:irc-rpl_endofexceptlist-message)) + cl-irc:irc-rpl_endofexceptlist-message + cl-irc:irc-ping-message))
(defmethod receiver-for-message ((message irc:irc-message) frame) (server-receiver frame))