From e7d313a0ad90e3adc4b3617a6a1261aee193faa2 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Mon, 23 Apr 2007 01:23:12 +0000 Subject: [PATCH] (magic-mode-alist): Allow for carriage-returns in sgml-mode entries. --- lisp/files.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/files.el b/lisp/files.el index 8aa06ddc877..5f600dcf167 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -2134,8 +2134,8 @@ associated with that interpreter in `interpreter-mode-alist'.") ;; These two must come after html, because they are more general: ("<\\?xml " . xml-mode) (,(let* ((incomment-re "\\(?:[^-]\\|-[^-]\\)") - (comment-re (concat "\\(?:!--" incomment-re "*-->[ \t\n]*<\\)"))) - (concat "[ \t\n]*<" comment-re "*!DOCTYPE ")) + (comment-re (concat "\\(?:!--" incomment-re "*-->[ \t\r\n]*<\\)"))) + (concat "[ \t\r\n]*<" comment-re "*!DOCTYPE ")) . sgml-mode) ("%!PS" . ps-mode) ("# xmcd " . conf-unix-mode)) -- 2.39.5