changeset 19483:51345fa7e08b

(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.
author Richard M. Stallman <rms@gnu.org>
date Sat, 23 Aug 1997 06:12:46 +0000
parents ec8fe53ace41
children e39dadab5521
files lisp/textmodes/sgml-mode.el
diffstat 1 files changed, 5 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/sgml-mode.el	Sat Aug 23 05:32:56 1997 +0000
+++ b/lisp/textmodes/sgml-mode.el	Sat Aug 23 06:12:46 1997 +0000
@@ -308,10 +308,11 @@
 	;; 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