Update of /project/beirc/cvsroot/beirc In directory clnet:/tmp/cvs-serv16518

Modified Files: application.lisp Log Message: fix the query auto-closer (use the receiver's connection, not the frame-current one)

--- /project/beirc/cvsroot/beirc/application.lisp 2006/02/25 15:22:22 1.41 +++ /project/beirc/cvsroot/beirc/application.lisp 2006/02/25 15:28:01 1.42 @@ -378,7 +378,7 @@ (= 0 (unseen-messages receiver) (all-unseen-messages receiver) (messages-directed-to-me receiver)) - (null (irc:find-channel (current-connection *application-frame*) (title receiver))) + (null (irc:find-channel (connection receiver) (title receiver))) (> (- (get-universal-time) (last-visited receiver)) *max-query-inactive-time*)) (push receiver receivers-to-close))) (receivers *application-frame*))