Re: [CODE] Adding continuation line characters in headers automatically.

[Lars Magne Ingebrigtsen <larsi@gnus.org>]

Matthieu Moy <Matthieu.Moy@imag.fr> writes:

> (defun moy-gnus-check-headers ()
>   "Checks wether  there is a mistake with  continuation line characters
> in the mail headers"
>   (interactive)
>   (save-restriction
>     (widen)
>     (narrow-to-region (point-min)
> 		      (progn (goto-char (point-min))
> 			     (search-forward mail-header-separator)
> 			     (beginning-of-line nil)
> 			     (point)
> 			     ))
>     (goto-char (point-min))
>     (while (re-search-forward "^[^ \\n][^:\\n]*$" nil t)
>       (if (y-or-n-p "You have line in your headers without : and not \
> beginning by a continuation caracter. Add one ?")
> 	  (progn
> 	    (goto-char (match-beginning 0))
> 	    (insert " "))
> 	(if (y-or-n-p "Send anyway ?")
> 	    t
> 	  (error "not sending message"))))
>     )
>   )

I think this is a good idea.  Do you have FSF copyright assignment
papers on file? 

-- 
(domestic pets only, the antidote for overdose, milk.)
   larsi@gnus.org * Lars Magne Ingebrigtsen