From b13ea22c9338097560d499872ef0a1f4aea15ba7 Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Wed, 30 Oct 2019 23:27:37 +0100 Subject: [PATCH] Rename `*-multiframe-window' to '*-window-any-frame' Suggested by Drew Adams. * lisp/frame.el (next-multiframe-window): Define as obsolete alias for... (next-window-any-frame): ...new function name. (previous-multiframe-window): Define as obsolete alias for... (previous-window-any-frame): ...new function name. (Bug#12436) * lisp/term/ns-win.el (global-map): Use new command name. * doc/emacs/windows.texi (Other Window): Document it. * etc/NEWS: Announce it. --- doc/emacs/windows.texi | 4 ++-- etc/NEWS | 10 ++++++++++ lisp/frame.el | 7 +++++-- lisp/term/ns-win.el | 2 +- 4 files changed, 18 insertions(+), 5 deletions(-) diff --git a/doc/emacs/windows.texi b/doc/emacs/windows.texi index 19f6cff7bf..53e9a4bb58 100644 --- a/doc/emacs/windows.texi +++ b/doc/emacs/windows.texi @@ -181,12 +181,12 @@ Other Window back and finish supplying the minibuffer argument that is requested. @xref{Minibuffer Edit}. -@findex next-multiframe-window +@findex next-window-any-frame The @code{other-window} command will normally only switch to the next window in the current frame (unless otherwise configured). If you work in a multi-frame environment and you want windows in all frames to be part of the cycle, you can rebind @kbd{C-x o} to the -@code{next-multiframe-window} command. (@xref{Rebinding}, for how to +@code{next-window-any-frame} command. (@xref{Rebinding}, for how to rebind a command.) @kindex C-M-v diff --git a/etc/NEWS b/etc/NEWS index e614197125..e005cc9406 100644 --- a/etc/NEWS +++ b/etc/NEWS @@ -202,6 +202,16 @@ the new version of the file again.) * Changes in Emacs 27.1 ++++ +** 'next/previous-multiframe-window' have been renamed. +The new names are as follows: + + 'next-multiframe-window' -> 'next-window-any-frame' + 'previous-multiframe-window' -> 'previous-window-any-frame' + +The old names are maintained as function aliases for backward +compatibility. + ** emacsclient +++ diff --git a/lisp/frame.el b/lisp/frame.el index 92fe57fbe6..1a15a4c9f2 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -673,7 +673,7 @@ get-other-frame is not considered (see `next-frame')." (if (equal (next-frame) (selected-frame)) (make-frame) (next-frame))) -(defun next-multiframe-window () +(defun next-window-any-frame () "Select the next window, regardless of which frame it is on." (interactive) (select-window (next-window (selected-window) @@ -681,7 +681,7 @@ next-multiframe-window 0)) (select-frame-set-input-focus (selected-frame))) -(defun previous-multiframe-window () +(defun previous-window-any-frame () "Select the previous window, regardless of which frame it is on." (interactive) (select-window (previous-window (selected-window) @@ -689,6 +689,9 @@ previous-multiframe-window 0)) (select-frame-set-input-focus (selected-frame))) +(defalias 'next-multiframe-window 'next-window-any-frame) +(defalias 'previous-multiframe-window 'previous-window-any-frame) + (defun window-system-for-display (display) "Return the window system for DISPLAY. Return nil if we don't know how to interpret DISPLAY." diff --git a/lisp/term/ns-win.el b/lisp/term/ns-win.el index 83b845b1a5..1841e679ac 100644 --- a/lisp/term/ns-win.el +++ b/lisp/term/ns-win.el @@ -102,7 +102,7 @@ 'ns-alternatives-map ;; Here are some Nextstep-like bindings for command key sequences. (define-key global-map [?\s-,] 'customize) -(define-key global-map [?\s-'] 'next-multiframe-window) +(define-key global-map [?\s-'] 'next-window-any-frame) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) -- 2.20.1