Mercurial > hg > xemacs-beta

comparison lisp/window-xemacs.el @ 444:576fb035e263 r21-2-37

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-37
author cvs
date Mon, 13 Aug 2007 11:36:19 +0200
parents abe6d1db359e
children 4a27df428c73
comparison
equal deleted inserted replaced
443:a8296e22da4e 444:576fb035e263
49 (interactive "_P") 49 (interactive "_P")
50 (center-to-window-line (if (consp n) nil n) window) 50 (center-to-window-line (if (consp n) nil n) window)
51 (when (null n) 51 (when (null n)
52 (redraw-frame (window-frame window) t))) 52 (redraw-frame (window-frame window) t)))
53 53
54 (defun backward-other-window (arg &optional all-frames device) 54 (defun backward-other-window (count &optional which-frames which-devices)
55 "Select the ARG'th different window on this frame, going backwards. 55 "Select the COUNT'th different window on this frame, going backwards.
56 This is just like calling `other-window' with the arg negated." 56 This is just like calling `other-window' with COUNT negated."
57 (interactive "p") 57 (interactive "p")
58 (other-window (- arg) all-frames device)) 58 (other-window (- count) which-frames which-devices))
59 59
60 (defalias 'windows-of-buffer 'get-buffer-window-list) 60 (defalias 'windows-of-buffer 'get-buffer-window-list)
61 61
62 (defun buffer-in-multiple-windows-p (&optional buffer) 62 (defun buffer-in-multiple-windows-p (&optional buffer)
63 "Return t if BUFFER is in multiple windows. 63 "Return t if BUFFER is in multiple windows.