(sgml-mode-common): Set paragraph-start like paragraph-separate.

Do match a line which is just a <...> construct after whitespac.e
Set adaptive-fill-regexp to match whitespace only.

diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el
index 792d643893e7afa292fe79a6e488fe6c1e96e923..8dfd427f9b4d9048dc3d5fdbde674e160f840555 100644 (file)
--- a/lisp/textmodes/sgml-mode.el
+++ b/lisp/textmodes/sgml-mode.el
@@ -308,10 +308,11 @@ varables of same name)."
        ;; A start or end tag by itself on a line separates a paragraph.
        ;; This is desirable because SGML discards a newline that appears
        ;; immediately after a start tag or immediately before an end tag.
-       paragraph-start "^[ \t\n]\\|\
-\\(</?\\([A-Za-z]\\([-.A-Za-z0-9= \t\n]\\|\"[^\"]*\"\\|'[^']*'\\)*\\)?>$\\)"
-       paragraph-separate "^[ \t\n]*$\\|\
-^</?\\([A-Za-z]\\([-.A-Za-z0-9= \t\n]\\|\"[^\"]*\"\\|'[^']*'\\)*\\)?>$"
+       paragraph-separate "[ \t]*$\\|\
+\[ \t]*</?\\([A-Za-z]\\([-.A-Za-z0-9= \t\n]\\|\"[^\"]*\"\\|'[^']*'\\)*\\)?>$"
+       paragraph-start "[ \t]*$\\|\
+\[ \t]*</?\\([A-Za-z]\\([-.A-Za-z0-9= \t\n]\\|\"[^\"]*\"\\|'[^']*'\\)*\\)?>$"
+       adaptive-fill-regexp "[ \t]*"
        comment-start "<!-- "
        comment-end " -->"
        comment-indent-function 'sgml-comment-indent