# HG changeset patch
# User Nick Roberts <nickrob@snap.net.nz>
# Date 1143449420 0
# Node ID 4b35cb9e0b98ffba4b68a6893782b63353293cdf
# Parent  a952be83821491f3ca27925ba4af8203a030dba9
(comint-dynamic-list-completions): Allow user to select *Completions* buffer.

diff -r a952be838214 -r 4b35cb9e0b98 lisp/comint.el
--- a/lisp/comint.el	Mon Mar 27 08:48:58 2006 +0000
+++ b/lisp/comint.el	Mon Mar 27 08:50:20 2006 +0000
@@ -2942,10 +2942,9 @@
 	  (progn
 	    (mouse-choose-completion first)
 	    (set-window-configuration comint-dynamic-list-completions-config))
-	(unless (eq first ?\s)
-	  (setq unread-command-events (listify-key-sequence key)))
-	(unless (eq first ?\t)
-	  (set-window-configuration comint-dynamic-list-completions-config))))))
+	(if (eq first ?\s)
+	    (set-window-configuration comint-dynamic-list-completions-config)
+	  (setq unread-command-events (listify-key-sequence key)))))))
 
 
 (defun comint-get-next-from-history ()