diff lisp/window.el @ 5473:ac37a5f7e5be

Merge with trunk.
author Mats Lidell <matsl@xemacs.org>
date Thu, 17 Mar 2011 23:42:59 +0100
parents 308d34e9f07d f00192e1cd49
children cc6f0266bc36
line wrap: on
line diff
--- a/lisp/window.el	Tue Feb 22 22:56:02 2011 +0100
+++ b/lisp/window.el	Thu Mar 17 23:42:59 2011 +0100
@@ -583,7 +583,7 @@
 	 (delq frame (visible-frame-list))
 	 window-solitary
 	 (if (and (eq default-minibuffer-frame frame)
-		  (= 1 (length (minibuffer-frame-list))))
+		  (eql 1 (length (minibuffer-frame-list))))
 	     (setq window nil)
 	   (delete-frame frame)
 	   (setq window-handled t)))