X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;ds=sidebyside;f=lisp%2Fgnus-cite.el;h=73c4befc8a7b32930bfead78c724d9a68772a301;hb=55f610143f1f63a6cc448649d02a51a0b99c04f1;hp=acbd0bb87ac81605b9e41b5bdeee88a22c7039da;hpb=8a2e97cacfe486f6049fa39cfd8b3ea9f590adca;p=gnus

diff --git a/lisp/gnus-cite.el b/lisp/gnus-cite.el
index acbd0bb87..73c4befc8 100644
--- a/lisp/gnus-cite.el
+++ b/lisp/gnus-cite.el
@@ -439,7 +439,9 @@ If WIDTH (the numerical prefix), use that text width when filling."
 	  (narrow-to-region (caar marks) (caadr marks))
 	  (let ((adaptive-fill-regexp
 		 (concat "^" (regexp-quote (cdar marks)) " *"))
-		(fill-prefix (cdar marks)))
+		(fill-prefix
+		 (if (string= (cdar marks) "") ""
+		   (concat (cdar marks) " "))))
 	    (fill-region (point-min) (point-max)))
 	  (set-marker (caar marks) nil)
 	  (setq marks (cdr marks)))