[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/lisp.el

[Stefan Monnier]

Index: emacs/lisp/emacs-lisp/lisp.el
diff -u emacs/lisp/emacs-lisp/lisp.el:1.70 emacs/lisp/emacs-lisp/lisp.el:1.71
--- emacs/lisp/emacs-lisp/lisp.el:1.70  Sat Dec 10 11:39:24 2005
+++ emacs/lisp/emacs-lisp/lisp.el       Wed Dec 21 20:02:20 2005
@@ -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