changeset 101988:0f2fdeca8ec1

(unrmail): When getting message keywords, don't include a leading space, but do include the space after the separating comma. (Bug#2303)
author Glenn Morris <rgm@gnu.org>
date Fri, 13 Feb 2009 03:44:10 +0000
parents ed50bbe67a12
children 1c4889d69312
files lisp/mail/unrmail.el
diffstat 1 files changed, 5 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/unrmail.el	Thu Feb 12 21:49:29 2009 +0000
+++ b/lisp/mail/unrmail.el	Fri Feb 13 03:44:10 2009 +0000
@@ -133,14 +133,16 @@
 		  (buffer-substring (point)
 				    (save-excursion (forward-line 1)
 						    (point))))
-	    (search-forward ",,")
+	    (re-search-forward ",, ?")
 	    (unless (eolp)
 	      (setq keywords
 		    (buffer-substring (point)
 				      (progn (end-of-line)
 					     (1- (point)))))
-	      (setq keywords
-		    (replace-regexp-in-string ", " "," keywords)))
+	      ;; Mbox rmail needs the spaces.  Bug#2303.
+	      ;;; (setq keywords
+	      ;;; 	    (replace-regexp-in-string ", " "," keywords))
+	      )
 
 	    (setq attrs
 		  (list