From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: michael.cadilhac@lrde.org (=?iso-8859-1?Q?Micha=EBl?= Cadilhac) Newsgroups: gmane.emacs.help Subject: Re: Local values of PC-word-delimiters. Date: Tue, 18 Apr 2006 12:05:01 +0200 Organization: Epita/LRDE Message-ID: <87zmijrygi.fsf@lrde.org> References: <87lku753yf.fsf@lrde.org> <87sloc9ls5.fsf@lrde.org> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="===============1301855480==" X-Trace: sea.gmane.org 1145386447 19754 80.91.229.2 (18 Apr 2006 18:54:07 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Tue, 18 Apr 2006 18:54:07 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Tue Apr 18 20:54:03 2006 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1FVvKQ-0007yP-Sx for geh-help-gnu-emacs@m.gmane.org; Tue, 18 Apr 2006 20:53:35 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1FVvKQ-0001Rv-Ga for geh-help-gnu-emacs@m.gmane.org; Tue, 18 Apr 2006 14:53:34 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1FVn4A-0007DY-Co for help-gnu-emacs@gnu.org; Tue, 18 Apr 2006 06:04:14 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1FVn44-0007Aq-EB for help-gnu-emacs@gnu.org; Tue, 18 Apr 2006 06:04:13 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1FVn44-0007Aj-3q for help-gnu-emacs@gnu.org; Tue, 18 Apr 2006 06:04:08 -0400 Original-Received: from [62.39.139.2] (helo=kualalumpur.lrde.epita.fr) by monty-python.gnu.org with esmtps (TLS-1.0:RSA_AES_256_CBC_SHA:32) (Exim 4.52) id 1FVn4u-0007vO-JR for help-gnu-emacs@gnu.org; Tue, 18 Apr 2006 06:05:01 -0400 Original-Received: from mahaena.lrde.epita.fr ([192.168.101.66] helo=mahaena.lrde) by kualalumpur.lrde.epita.fr with esmtp (Exim 4.50) id 1FVn42-0000Uz-BK for help-gnu-emacs@gnu.org; Tue, 18 Apr 2006 12:04:06 +0200 Original-To: help-gnu-emacs@gnu.org Face: iVBORw0KGgoAAAANSUhEUgAAADAAAAAwBAMAAAClLOS0AAAAElBMVEVWPh+Tai+5r5YKBAEU CQQzGAtiq7gjAAACR0lEQVQ4jW2UzW7lIAyFzVW8BzTZX5DmCZLuU2H2pMXv/ypzbK7aSh2kRCRf /HNsE0q7Sg+RQ7JFKaqtrRNAl5AIIKe6D5DBqgbmUAe5hBI1wIRFAHjeM0RKtZi7XVVEpb0BSNfA IddChChT5DildSLWOWhY5IEItMnncZgFcUAc/5jjwCMsDosRNdfKPDTFEdVBW8C+RebDb4N5Orio RhM1+11IJyx0ng2+LryFHBMPDQDYHrY6IfGuU3ouiXTQNE8LIJDKOWpNxERTFrggQwRPd7USUsTW fJ0XbR3bdj5KgBYy4SACpxDeUYEUAzLmtJ1iIrD2gczPq8Qomjhsh/RjGIgKIO8p7NITjwlx7WID nsnQe5NeuTvoBpi8LX6vLLOh5icjOHqBypgnuSp7M+RE1agbQKHQr5E2z1WObhYW4gMqeGQL7joM jCf2DxSk5ApADSYHfFF4igNfJZL1z0GKP0FN02s4XiDXr7V5P94W6I9v8MfBOQDmfwAaVYt+x8Da v4DJvX8BAdin3Knm5yMZYAO4ABDkDniZLLfi4P40gP1F0TPGZOu0CGwA1lcowxwlGy6A9705mD0V jHCxwVZT/hYdRJVUGZNlx6l7ScQBTluof6Wj6bsPYlvpwoTvXFD9gHPn2TZPF3ntI2ecxVrW5MrV XiCie5EeNa7BlWu/HNSkprDUva163PHxAv5jyGV7gVzyAghSKOTnat85UIYFICXbD2NV9rRiv0BS tKQsg6OHH4A15F1WW+UHKHHa32h6aPnAm3/pUcWp+WYnTQAAAABJRU5ErkJggg== In-Reply-To: <87sloc9ls5.fsf@lrde.org> (=?iso-8859-1?Q?Micha=EBl?= Cadilhac's message of "Mon, 17 Apr 2006 19:03:54 +0200") User-Agent: Gnus/5.110005 (No Gnus v0.5) Emacs/22.0.50 (gnu/linux) X-Mailman-Approved-At: Tue, 18 Apr 2006 14:53:23 -0400 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:34432 Archived-At: --===============1301855480== Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" --=-=-= Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: quoted-printable michael.cadilhac@lrde.org (Micha=EBl Cadilhac) writes: > Kevin Rodgers writes: > >> Micha=EBl 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. >>> >> >> 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))))) > > Nice try :-) > > Well, it doesn't. It complains about infinite recursion. I think it's > due to infinite evaluation of the advice on the =AB interactive-form = =BB. > > However, with a =AB before =BB advice, I think jump-to-group would have > been called twice. Okey, this remark was silly, I didn't read as I should your proposition, TITS with a lot of attention ;-) The following doesn't work: > (defadvice gnus-group-jump-to-group (around PC-word-delimiters activate) > "Temporarily bind `PC-word-delimiters' while reading GROUP." > (interactive > (let ((PC-word-delimiters ":")) > (ad-deactivate 'gnus-group-jump-to-group) > (call-interactively 'gnus-group-jump-to-group) > (ad-activate 'gnus-group-jump-to-group)))) And is really dirty. One can fix your proposal, which is a really great one, by the following : (defadvice gnus-group-jump-to-group (before PC-word-delimiters activate) "Temporarily bind `PC-word-delimiters' while reading GROUP." (interactive (progn (ad-deactivate 'gnus-group-jump-to-group) (let* ((PC-word-delimiters ":") (retval (call-interactively `(lambda (&rest args) ,(interactive-form 'gnus-group-jump-to-group) args)))) (ad-activate 'gnus-group-jump-to-group) retval)))) Thank you again, now it seems fine ! =2D-=20 | Micha=EBl `Micha' Cadilhac | Pour les 35-40 ans, l'humour = | | Epita/LRDE Promo 2007 | c'est une plus-value. = | | http://www.lrde.org/~cadilh_m | -- Guillaume L. = | `-- - JID: micha@amessage.be --' - -= -' --=-=-= Content-Type: application/pgp-signature -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.2 (GNU/Linux) iD8DBQFERLnQZYNf4qobZ7kRArngAKCynH3yZVcHF/EMTGEIBbbsParwYQCgnYZH tzCDHMlCzY4hPbBdDt5MGAw= =ecx8 -----END PGP SIGNATURE----- --=-=-=-- --===============1301855480== Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ help-gnu-emacs mailing list help-gnu-emacs@gnu.org http://lists.gnu.org/mailman/listinfo/help-gnu-emacs --===============1301855480==--