[slime-cvs] CVS update: slime/slime.el

[Helmut Eller]

Update of /project/slime/cvsroot/slime
In directory common-lisp.net:/tmp/cvs-serv7296

Modified Files:
	slime.el 
Log Message:
(slime-selector): Discard input after sleeping.
Date: Thu Apr 14 17:40:09 2005
Author: heller

Index: slime/slime.el
diff -u slime/slime.el:1.482 slime/slime.el:1.483
--- slime/slime.el:1.482	Sat Apr  9 09:05:54 2005
+++ slime/slime.el	Thu Apr 14 17:40:08 2005
@@ -5936,6 +5936,7 @@
   (setq slime-buffer-package package)
   (slime-set-truncate-lines))
 
+;; XXX: unused function
 (defun slime-display-xref-buffer ()
   "Display the XREF results buffer in a window and select it."
   (let* ((buffer (slime-xref-buffer))
@@ -7548,6 +7549,7 @@
            (message "No method for character: ?\\%c" ch)
            (ding)
            (sleep-for 1)
+           (discard-input)
            (slime-selector))
           (t
            (funcall (third method))))))