Update of /project/beirc/cvsroot/beirc In directory clnet:/tmp/cvs-serv17637
Modified Files: message-processing.lisp Log Message: remove annoying print statement.
--- /project/beirc/cvsroot/beirc/message-processing.lisp 2006/02/26 18:41:21 1.1 +++ /project/beirc/cvsroot/beirc/message-processing.lisp 2006/02/26 18:42:43 1.2 @@ -55,6 +55,5 @@
(define-beirc-hook update-away-status ((message irc:irc-rpl_noaway-message irc:irc-rpl_unaway-message)) "Set/Unset away status." - (print (away-status *application-frame* (irc:connection message)) *debug-io*) (setf (away-status *application-frame* (irc:connection message)) (typep message 'irc:irc-rpl_noaway-message)))