Mercurial > emacs
changeset 72182:9482f7b84d4d
(bw-get-tree): Don't integerp subtree if it's nil.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Sat, 29 Jul 2006 11:19:58 +0000 |
| parents | b6eeaa75a14a |
| children | 820ab848182d |
| files | lisp/window.el |
| diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- 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)