From: Kevin Rodgers <ihs_4664@yahoo.com>
Subject: Re: Local values of PC-word-delimiters.
Date: Mon, 17 Apr 2006 10:22:10 -0600 [thread overview]
Message-ID: <e20fd0$bva$1@sea.gmane.org> (raw)
In-Reply-To: <87lku753yf.fsf@lrde.org>
Michaël Cadilhac wrote:
> I've a problem I can't solve in a clean way, here.
>
> I want that when `gnus-group-jump-to-group' is called, its
> completing-read (PC enabled) uses `:' as PC-word-delimiters.
>
> Easy you say ? Thought so ;-)
>
> I first tried
>
> (add-hook 'gnus-group-mode
> (lambda ()
> (set (make-local-variable 'PC-word-delimiters) ":")))
>
> But it was no use since we're in the minibuffer when
> PC-word-delimiters is read.
>
> I then tried
>
> (defadvice gnus-group-jump-to-group (around dummy-name activate)
> (let ((PC-word-delimiters ":"))
> ad-do-it))
>
> But since `gnus-group-jump-to-group' uses completing-read in its
> `interactive' part, the advice is executed AFTER it.
>
> Do you have any clean solution ?
Does this work?
(defadvice gnus-group-jump-to-group (before PC-word-delimiters activate)
"Temporarily bind `PC-word-delimiters' while reading GROUP."
(interactive
(let ((PC-word-delimiters ":"))
(call-interactively
`(lambda (&rest args)
,(interactive-form 'gnus-group-jump-to-group)
args)))))
--
Kevin Rodgers
next prev parent reply other threads:[~2006-04-17 16:22 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2006-04-15 14:05 Local values of PC-word-delimiters Michaël Cadilhac
2006-04-17 16:22 ` Kevin Rodgers [this message]
2006-04-17 17:03 ` Michaël Cadilhac
2006-04-18 10:05 ` Michaël Cadilhac
2006-04-19 16:14 ` Kevin Rodgers
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
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to='e20fd0$bva$1@sea.gmane.org' \
--to=ihs_4664@yahoo.com \
/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.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).