Mercurial > hg > xemacs-beta

comparison lisp/vm/vm-window.el @ 108:360340f9fd5f r20-1b6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b6
author cvs
date Mon, 13 Aug 2007 09:18:39 +0200
parents a145efe76779
children fe104dbd9147
comparison
equal deleted inserted replaced
107:523141596bda 108:360340f9fd5f
81 (vm-get-visible-buffer-window buffer))) 81 (vm-get-visible-buffer-window buffer)))
82 (vm-display-buffer buffer)))) 82 (vm-display-buffer buffer))))
83 ((and buffer (not display)) 83 ((and buffer (not display))
84 (if (and vm-undisplay-buffer-hook 84 (if (and vm-undisplay-buffer-hook
85 (vm-get-visible-buffer-window buffer)) 85 (vm-get-visible-buffer-window buffer))
86 (progn (run-hooks 'vm-undisplay-buffer-hook) 86 (progn (set-buffer buffer)
87 (run-hooks 'vm-undisplay-buffer-hook)
87 (vm-record-current-window-configuration nil)) 88 (vm-record-current-window-configuration nil))
88 (if (not (and (memq this-command commands) 89 (if (not (and (memq this-command commands)
89 (apply 'vm-set-window-configuration configs))) 90 (apply 'vm-set-window-configuration configs)))
90 (vm-undisplay-buffer buffer)))) 91 (vm-undisplay-buffer buffer))))
91 ((memq this-command commands) 92 ((memq this-command commands)