From: Matthias Meulien <orontee@gmail.com>
To: bug-gnu-emacs@gnu.org
Cc: emacs-devel@gnu.org
Subject: Key bindings for info in other window or frame
Date: Wed, 24 Jul 2013 23:28:00 +0200 [thread overview]
Message-ID: <87k3kfmyvz.fsf@gmail.com> (raw)
[-- Attachment #1: Type: text/plain, Size: 354 bytes --]
Severity: wishlist Tags: patch
Everything is in the subject!
The attached patch defines `info-other-frame' and bind it to `C-x
5 i'. It also bind `info-other-window' to `C-x 4 i'.
I know that `info-other-window' is already bind to `C-h 4 i' but I
found it more difficult to remember than the key binding which use
the ubiquitous `C-x 4' keymap.
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Key bindings for info in other window or frame --]
[-- Type: text/x-diff, Size: 1590 bytes --]
From cf8d4210743c1c9b06db28e5b5bb5a51f8a190bf Mon Sep 17 00:00:00 2001
From: Matthias Meulien <orontee@gmail.com>
Date: Wed, 24 Jul 2013 23:23:44 +0200
Subject: [PATCH] lisp/info.el (info-other-window): Add key binding and other
frame defun
---
lisp/info.el | 13 +++++++++++++
1 file changed, 13 insertions(+)
diff --git a/lisp/info.el b/lisp/info.el
index 0e0a117..99098e8 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -745,6 +745,7 @@ in `Info-file-supports-index-cookies-list'."
(not (member dir (split-string path ":" t)))
(push dir Info-directory-list)))))))
+;;;###autoload (define-key ctl-x-4-map "i" 'info-other-window)
;;;###autoload
(defun info-other-window (&optional file-or-node buffer)
"Like `info' but show the Info buffer in another window."
@@ -756,6 +757,18 @@ in `Info-file-supports-index-cookies-list'."
(info-setup file-or-node
(switch-to-buffer-other-window (or buffer "*info*"))))
+;;;###autoload (define-key ctl-x-5-map "i" 'info-other-frame)
+;;;###autoload
+(defun info-other-frame (&optional file-or-node buffer)
+ "Like `info' but put the Info buffer in another frame."
+ (interactive (list
+ (if (and current-prefix-arg (not (numberp current-prefix-arg)))
+ (read-file-name "Info file name: " nil nil t))
+ (if (numberp current-prefix-arg)
+ (format "*info*<%s>" current-prefix-arg))))
+ (info-setup file-or-node
+ (switch-to-buffer-other-frame (or buffer "*info*"))))
+
;;;###autoload (put 'info 'info-file (purecopy "emacs"))
;;;###autoload
(defun info (&optional file-or-node buffer)
--
1.8.3.3
[-- Attachment #3: Type: text/plain, Size: 34 bytes --]
Thanks for reading,
--
Matthias
next reply other threads:[~2013-07-24 21:28 UTC|newest]
Thread overview: 8+ messages / expand[flat|nested] mbox.gz Atom feed top
2013-07-24 21:28 Matthias Meulien [this message]
2013-07-25 1:09 ` Key bindings for info in other window or frame Stefan Monnier
2013-07-25 8:15 ` Matthias Meulien
2013-07-26 21:46 ` Matthias Meulien
2013-07-27 14:05 ` Stefan Monnier
2013-07-27 21:02 ` Matthias Meulien
2013-07-27 14:06 ` Stefan Monnier
2013-07-27 21:06 ` Matthias Meulien
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87k3kfmyvz.fsf@gmail.com \
--to=orontee@gmail.com \
--cc=bug-gnu-emacs@gnu.org \
--cc=emacs-devel@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.