Re: Can I get rid of the \201 ?

[Svend Tollak Munkejord <stm+direct_reply@bacchus.pvv.org>]

I wrote:

> The body of the message is supposed to be "Hei øæå". The Subject is
> interesting, because it appears all right in the Article buffer, whereas
> in the Summary buffer it appears as "Test øæå".
>
> Can I get rid of this?

I have found that the reason for the misbehaviour is my fancy split-on-body
function. However, I don't understand why. Can anyone help?

Here it is:

(defun stm-split-on-body (relevant-terms-regexp groupname &optional regex)
  "Splits e-mail *not* fitting RELEVANT-TERMS-REGEXP to group
GROUPNAME (string).
If REGEX is nil, relevant-terms-regexp must be a list instead. Well.
Used in: nnmail-split-fancy"
  (save-excursion
; (" *nnmail incoming*") for e-mail:
    (let ((buf (or (get-buffer nnmail-article-buffer)
; (" *Original Article*") for trace (B t)
		   (get-buffer gnus-original-article-buffer)
; for respool -- Aargh. Does not work for nnmaildir:
		   (get-buffer " *nnmaildir move*"))))
      (if (not buf)
	  (progn (message "Oops, cannot find message buffer") nil)
	(set-buffer buf)
	(save-restriction
	  (if (string= (buffer-name buf) gnus-original-article-buffer)
	      (widen))
; in case we have base64 etc.
	  (run-hooks 'gnus-article-decode-hook)
	  (goto-char (point-min))
	  (if regex
	      (when (not (re-search-forward relevant-terms-regexp nil t));
		groupname)
	    (when (not (all-words-present-p relevant-terms-regexp));
	      groupname)))))))

Regards,
-- 
Svend Tollak Munkejord