From: Eshel Yaron <me@eshelyaron.com>
Date: Tue, 9 Jul 2024 16:49:10 +0000 (+0200)
Subject: Add 'minibuffer-action' to 'info-apropos'
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a94e469c943656fbd04ff4a6198c9e7d228d20bc;p=emacs.git

Add 'minibuffer-action' to 'info-apropos'
---

diff --git a/lisp/info.el b/lisp/info.el
index 413af04f95f..b1732429c40 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -3876,6 +3876,10 @@ Display a menu of the possible matches."
 	(push (list nodename string (Info-apropos-matches string regexp))
 	      Info-apropos-nodes)
 	(Info-find-node Info-apropos-file nodename)))))
+
+(put 'info-apropos 'minibuffer-action
+     (cons (lambda (s) (save-selected-window(info-apropos s))) "apropos"))
+
 
 (add-to-list 'Info-virtual-files
 	     '("\\`\\*Finder.*\\*\\'"