Re: message-newline-and-reformat and supercite

[Vladimir Volovich <vvv@vvv.vsu.ru>]

"CC" == Christophe Cuq writes:

 VV> Note that the rest of the quote was micely reformatted, and
 VV> cursor was put at the convenient place. Doesn't this work for
 VV> you?

 CC> I have the same problem as François. When I use M-RET it does not
 CC> reformat the quoted material. The first line appears without the
 CC> quote mark.

 CC> Do you have a workaround ?

the current message-newline-and-reformat in gnus 0.97 behaves like you
said. i already posted the corrected function. here is it again:

(defun message-newline-and-reformat ()
  "Insert four newlines, and then reformat if inside quoted text."
  (interactive)
  (let ((point (point))
	quoted)
    (save-excursion
      (beginning-of-line)
      (if (looking-at (sc-cite-regexp))
	  (setq quoted (buffer-substring (match-beginning 0) (match-end 0)))))
    (insert "\n\n\n\n")
    (delete-region (point) (re-search-forward "[ \t]*"))
    (when quoted
      (insert quoted))
    (fill-paragraph nil)
    (goto-char point)
    (forward-line 2)))

does it work for you, or is *the above* function behaving buggy?

	Best regards, -- Vladimir.