info-gnus-english
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Scope of headers in posting styles


From: Reiner Steib
Subject: Re: Scope of headers in posting styles
Date: Thu, 23 Sep 2004 13:40:11 +0200
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/21.3.50 (gnu/linux)

On Thu, Sep 23 2004, Svend Tollak Munkejord wrote:

> On 2004-09-23, Reiner Steib <4.uce.03.r.s@nurfuerspam.de> wrote:
[...]
>> When I add your example to my `gnus-posting-styles', replying to
>> your message isn't triggered (tc-make-attribution is void).
>
> I use trivial-cite, but the problem isn't related to
> trivial-cite. 

Yes, I know.  But replying to your first message (with the Outlook
quote) should trigger the eval/setq statement, but it doesn't.

Ah, the reason is, that "<svend@mydomain>" doesn't match
".*\\.mydomain\\>" (note the dot).  Now I could reproduce it.

Could you test the following patch?

--8<---------------cut here---------------start------------->8---
--- gnus-msg.el 22 Sep 2004 04:40:39 -0000      7.21
+++ gnus-msg.el 23 Sep 2004 11:39:05 -0000
@@ -1827,9 +1827,11 @@
                  ;; New format of header match.
                  (and (gnus-buffer-live-p gnus-article-copy)
                       (with-current-buffer gnus-article-copy
-                        (let ((header (message-fetch-field (nth 1 match))))
-                          (and header
-                               (string-match (nth 2 match) header))))))
+                        (save-restriction
+                          (nnheader-narrow-to-headers)
+                          (let ((header (message-fetch-field (nth 1 match))))
+                            (and header
+                                 (string-match (nth 2 match) header)))))))
                 (t
                  ;; This is a form to be evaled.
                  (eval match)))))
--8<---------------cut here---------------end--------------->8---

Bye, Reiner.

reply via email to

[Prev in Thread] Current Thread [Next in Thread]