[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