diff options
| author | Richard M. Stallman <rms@gnu.org> | 2004-04-20 20:58:30 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2004-04-20 20:58:30 +0000 |
| commit | 6b3b4dbbfcf65ffde08d3b82e5b29db2bb177204 (patch) | |
| tree | 0f50810f2c7d4d87e0b2ab9c9e0fc16228e8950f /lisp/window.el | |
| parent | da932079d0f7a35c0c7567a9c5fd4dbbbe7af077 (diff) | |
| download | emacs-6b3b4dbbfcf65ffde08d3b82e5b29db2bb177204.tar.gz | |
(split-window-save-restore-data):
Don't update the data if OLD-INFO is nil.
Diffstat (limited to 'lisp/window.el')
| -rw-r--r-- | lisp/window.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/window.el b/lisp/window.el index 91b91cfb158..2b5a4ab161d 100644 --- a/lisp/window.el +++ b/lisp/window.el @@ -327,8 +327,9 @@ new mode line." (with-current-buffer (window-buffer) (if view-mode (let ((old-info (assq old-w view-return-to-alist))) - (push (cons new-w (cons (and old-info (car (cdr old-info))) t)) - view-return-to-alist))) + (if old-info + (push (cons new-w (cons (car (cdr old-info)) t)) + view-return-to-alist)))) new-w)) (defun split-window-horizontally (&optional arg) |