[beirc-cvs] CVS beirc
afuchs
afuchs at common-lisp.net
Sun Feb 26 18:42:43 UTC 2006
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)))
More information about the Beirc-cvs
mailing list