Mercurial > emacs

diff lisp/gnus/nnmail.el @ 86225:166a6141ae98

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from gnus--devo--0 Revision: emacs@sv.gnu.org/emacs--devo--0--patch-933
author Miles Bader <miles@gnu.org>
date Mon, 19 Nov 2007 05:50:39 +0000
parents a3c27999decb
children 781256628613
line wrap: on
line diff
--- a/lisp/gnus/nnmail.el	Mon Nov 19 00:25:31 2007 +0000
+++ b/lisp/gnus/nnmail.el	Mon Nov 19 05:50:39 2007 +0000
@@ -693,7 +693,7 @@
 	      (setq group (symbol-name group)))
 	    (if (and (numberp (setq max (read buffer)))
 		     (numberp (setq min (read buffer))))
-		(push (list group (cons min max))
+		(push (list (mm-string-as-unibyte group) (cons min max))
 		      group-assoc)))
 	(error nil))
       (widen)
@@ -708,6 +708,7 @@
   (let ((coding-system-for-write nnmail-active-file-coding-system))
     (when file-name
       (with-temp-file file-name
+	(mm-disable-multibyte)
 	(nnmail-generate-active group-assoc)))))
 
 (defun nnmail-generate-active (alist)