diff lisp/window.el @ 72182:9482f7b84d4d

(bw-get-tree): Don't integerp subtree if it's nil.

--- a/lisp/window.el	Sat Jul 29 11:12:06 2006 +0000
+++ b/lisp/window.el	Sat Jul 29 11:19:58 2006 +0000
@@ -246,9 +246,10 @@
                 (windowp window-or-frame))
       (error "Not a frame or window: %s" window-or-frame)))
   (let ((subtree (bw-find-tree-sub window-or-frame)))
-    (if (integerp subtree)
-        nil
-      (bw-get-tree-1 subtree))))
+    (when subtree
+      (if (integerp subtree)
+	  nil
+	(bw-get-tree-1 subtree)))))
 
 (defun bw-get-tree-1 (split)
   (if (windowp split)