[beirc-cvs] CVS beirc
afuchs
afuchs at common-lisp.net
Mon Mar 6 17:53:59 UTC 2006
Update of /project/beirc/cvsroot/beirc
In directory clnet:/tmp/cvs-serv15579
Modified Files:
application.lisp
Log Message:
oops, remove the misleading comment in read-frame-command too.
--- /project/beirc/cvsroot/beirc/application.lisp 2006/03/06 17:41:32 1.51
+++ /project/beirc/cvsroot/beirc/application.lisp 2006/03/06 17:53:58 1.52
@@ -887,12 +887,6 @@
(multiple-value-prog1
(cond ((eql c #\/)
(clim:read-gesture :stream stream)
- ;; XXX: when accepting commands, the
- ;; input buffer line will not be saved
- ;; if the user selects a command or
- ;; presentation-translated-to-a-command.
- ;;
- ;; maybe using *pointer-button-press-handler* could work.
(accept 'command :stream stream :prompt nil))
(t
(list 'com-say (accept 'mumble :history 'mumble :prompt nil :stream stream))))
More information about the Beirc-cvs
mailing list