From 7a18f5c2af2b96251a501065a2c608c5abb66255 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 24 Nov 1993 06:46:26 +0000 Subject: [PATCH] (walk-windows): If start at minibuf window, do return to it. --- lisp/subr.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/subr.el b/lisp/subr.el index 6837adc8791..f21ec98c823 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -75,6 +75,9 @@ ALL-FRAMES nil or omitted means cycle within the selected frame, but include the minibuffer window (if MINIBUF says so) that that frame uses, even if it is on another frame. If ALL-FRAMES is neither nil nor t, stick strictly to the selected frame." + ;; If we start from the minibuffer window, don't fail to come back to it. + (if (window-minibuffer-p (selected-window)) + (setq minibuf t)) (let* ((walk-windows-start (selected-window)) (walk-windows-current walk-windows-start)) (while (progn -- 2.39.5