Re: how do I make html-mode break on <br> tags?

[Andreas Roehler]

Gene Cash wrote:

> How the hell do I get html-mode to break on <br> tags?
> 
> I've dicked around with paragraph-start and paragraph-separate
> for hours with no luck. The docs don't explain anywhere how the
> fill algorithm decides to break paragraphs.
> 
> I'd like
> 
> <br>blah blah blah blah<br>blah blah blah blah<br>blah blah
> blah blah<br>
> 
> to turn into:
> 
> <br>
> blah blah blah blah<br>
> blah blah blah blah<br>
> blah blah blah blah<br>
> 
> when I hit M-q
> 
> -gc
> 
> 
;; Don't no, if it's the best way, just one.

(defun newline-after-html-break ()
  "Insert a newline after any <br> in html source code"
  (interactive "*")
  (save-excursion 
    (goto-char (point-min))
    (while (re-search-forward "<br>" nil 'move 1)
      (replace-match "<br>\n"))))


(define-key html32-mode-map (kbd "M-q") 'newline-after-html-break)


;; Tried this, but it doesn't work. Any ideas?


;; (defun set-paragraph-function ()
;;   " "
;;   (interactive)
;;   (if (eq major-mode 'html32-mode)
;;       (setq fill-paragraph-function 'newline-after-html-break)))

__
Andreas Roehler