diff lisp/window-xemacs.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 5d3bb1100832
line wrap: on
line diff
--- a/lisp/window-xemacs.el	Tue Feb 22 22:56:02 2011 +0100
+++ b/lisp/window-xemacs.el	Thu Mar 17 23:42:59 2011 +0100
@@ -549,7 +549,7 @@
   (interactive)
   (let ((wc (or config (current-window-configuration)))
 	(stack (window-config-stack)))
-    (if (or (= 0 (undoable-stack-a-length stack))
+    (if (or (eql 0 (undoable-stack-a-length stack))
 	    (not (equal (undoable-stack-a-top stack) wc)))
 	(undoable-stack-push stack wc))))