Hello! On 10. Mär. 2020 at 18:49 Adam Sjøgren writes via info-gnus-english: > Eric writes:
>> You could try adding an entry along the lines of >> >> ("references" >> ("<some regex goes here>" 100 nil r)) >> >> to your .SCORE file where the regex is something that matches your >> emails, i.e. the typical message-id of your emails (which, for instance, >> is <7ywo7skzgd....@gmx.com> for the article I'm responding to). What I >> don't know is whether there is a regex that would work generally to >> identify your articles. Message IDs are a mystery to me. > > Yes, that works. > > I have this in my all.SCORE: > > ("references" > ("<87[0-9a-z]+\\.fsf\\(_-_\\)?@.*koldfront.dk>" nil nil r)) > > I think the way Gnus generates Message-IDs, the first two chars are > stable per machine (or perhaps user), or something like that. Nope, the first 2 Chars in the MID a generated from the UID of the User: In my Setup the fsf Part is replaced with the name of the current PC. Here is the Code for this - perhaps you can better finetune the Scoring. --8<---------------cut here---------------start------------->8--- (defun message-unique-id () ;; Don't use microseconds from (current-time), they may be unsupported. ;; Instead we use this randomly inited counter. (setq message-unique-id-char (% (1+ (or message-unique-id-char (random (ash 1 20)))) ;; (current-time) returns 16-bit ints, ;; and 2^16*25 just fits into 4 digits i base 36. (* 25 25))) (let ((tm (current-time))) (concat (if (or (eq system-type 'ms-dos) ;; message-number-base36 doesn't handle bigints. (floatp (user-uid))) (let ((user (downcase (user-login-name)))) (while (string-match "[^a-z0-9_]" user) (aset user (match-beginning 0) ?_)) user) (message-number-base36 (user-uid) -1)) (message-number-base36 (+ (car tm) (ash (% message-unique-id-char 25) 16)) 4) (message-number-base36 (+ (nth 1 tm) (ash (/ message-unique-id-char 25) 16)) 4) ;; Append a given name, because while the generated ID is unique ;; to this newsreader, other newsreaders might otherwise generate ;; the same ID via another algorithm. ".warhorse"))) ;; ^^^^^^^^^^ ;; Replace warhorse with the current machine Name (or something else) --8<---------------cut here---------------end--------------->8--- -- Best Regards, Clemens Schüller _______________________________________________ info-gnus-english mailing list info-gnus-english@gnu.org https://lists.gnu.org/mailman/listinfo/info-gnus-english