Mercurial > emacs

diff lisp/emacs-lisp/lisp.el @ 67721:d372bc6eff1d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(lisp-complete-symbol): Don't call delete-windows-on with an inexistent buffer.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 21 Dec 2005 20:02:20 +0000
parents dc66229d83bf
children bffc4c57eda9
line wrap: on
line diff
--- a/lisp/emacs-lisp/lisp.el	Wed Dec 21 17:33:40 2005 +0000
+++ b/lisp/emacs-lisp/lisp.el	Wed Dec 21 20:02:20 2005 +0000
@@ -589,8 +589,9 @@
 		 (if (> (length list) 1)
 		     (with-output-to-temp-buffer "*Completions*"
 		       (display-completion-list list pattern))
-		   (delete-windows-on "*Completions*")))
+                   (if (get-buffer "*Completions*")
+                       (delete-windows-on "*Completions*"))))
 	       (message "Making completion list...%s" "done")))))))
 
-;;; arch-tag: aa7fa8a4-2e6f-4e9b-9cd9-fef06340e67e
+;; arch-tag: aa7fa8a4-2e6f-4e9b-9cd9-fef06340e67e
 ;;; lisp.el ends here