all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: Nicolas Richard <youngfrog@members.fsf.org>
To: martin rudalics <rudalics@gmx.at>
Cc: "21649@debbugs.gnu.org" <21649@debbugs.gnu.org>
Subject: bug#21649: 25.0.50; [PATCH] Allow M-x man to reuse an existing window
Date: Thu, 22 Oct 2015 21:21:00 +0200	[thread overview]
Message-ID: <86bnbqd80z.fsf@members.fsf.org> (raw)
In-Reply-To: <56290200.1000700@gmx.at> (martin rudalics's message of "Thu, 22 Oct 2015 17:34:24 +0200")

martin rudalics <rudalics@gmx.at> writes:
> Sorry, I must have missed your patch.

Here's most of the patch :

+      (`manly
+       (and (frame-live-p saved-frame)
+            (select-frame saved-frame))
+       (if-let ((window (seq-some-p
+                         (lambda (window)
+                           (with-current-buffer (window-buffer window)
+                             (derived-mode-p 'Man-mode)))
+                         (window-list))))
+           (set-window-buffer window man-buffer)
+         (display-buffer man-buffer)))

> How about writing an action function, say ‘man-display-buffer-my-way’, and
> adding a clause like
>
>       (`my-way
>        (and (frame-live-p saved-frame)
>             (select-frame saved-frame))
>        (display-buffer man-buffer
>        '((man-display-buffer-my-way ...)
>        . nil)))

Sure, why not!

> And please don't drop 21649@debbugs.gnu.org from the list of recipients!

That was not intended. I probably hit R instead of F, sorry about that.

Nico.





  reply	other threads:[~2015-10-22 19:21 UTC|newest]

Thread overview: 16+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2015-10-08 15:54 bug#21649: 25.0.50; [PATCH] Allow M-x man to reuse an existing window Nicolas Richard
2015-10-09 14:37 ` Kaushal Modi
     [not found]   ` <86r3l09t3u.fsf@members.fsf.org>
2015-10-12 15:06     ` Kaushal Modi
2015-10-13 22:10       ` Nicolas Richard
2015-10-13 22:19         ` Kaushal Modi
2015-10-14  8:49           ` martin rudalics
     [not found]             ` <86wpufc8n8.fsf@members.fsf.org>
2015-10-22 15:34               ` martin rudalics
2015-10-22 19:21                 ` Nicolas Richard [this message]
2015-10-23  8:01                   ` martin rudalics
2016-03-01 15:49                     ` Nicolas Richard
2016-03-01 17:04                       ` martin rudalics
2016-03-10  9:55                         ` Nicolas Richard
2016-03-10 10:32                           ` martin rudalics
2016-03-10 13:49                             ` Nicolas Richard
2015-10-27 11:30 ` Nicolas Richard
2015-10-28  9:55   ` martin rudalics

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=86bnbqd80z.fsf@members.fsf.org \
    --to=youngfrog@members.fsf.org \
    --cc=21649@debbugs.gnu.org \
    --cc=rudalics@gmx.at \
    /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.