aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong2009-09-21 22:12:28 +0000
committerChong Yidong2009-09-21 22:12:28 +0000
commit91fdbd6fdc7a68a9832166d4e35e8b0ed31d72e0 (patch)
tree0f816d27b61a11f6c5f23959beda639ffebaae3c
parent7589d38e9ec04efa76019d18080ac48747c2a5ca (diff)
downloademacs-91fdbd6fdc7a68a9832166d4e35e8b0ed31d72e0.tar.gz
emacs-91fdbd6fdc7a68a9832166d4e35e8b0ed31d72e0.zip
* files.el (conf-mode-maybe, magic-fallback-mode-alist): Use
nxml-mode instead of xml-mode.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/files.el4
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6d61d838467..56328bbad57 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12009-09-21 Chong Yidong <cyd@stupidchicken.com>
2
3 * files.el (conf-mode-maybe, magic-fallback-mode-alist): Use
4 nxml-mode instead of xml-mode.
5
12009-09-21 Kevin Ryde <user42@zip.com.au> 62009-09-21 Kevin Ryde <user42@zip.com.au>
2 7
3 * net/dig.el: Add "Keywords: comm", as per net-utils.el. (Bug#4501) 8 * net/dig.el: Add "Keywords: comm", as per net-utils.el. (Bug#4501)
diff --git a/lisp/files.el b/lisp/files.el
index b010b08d883..13f907cd411 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -2344,7 +2344,7 @@ and `magic-mode-alist', which determines modes based on file contents.")
2344 (widen) 2344 (widen)
2345 (goto-char (point-min)) 2345 (goto-char (point-min))
2346 (looking-at "<\\?xml \\|<!-- \\|<!DOCTYPE "))) 2346 (looking-at "<\\?xml \\|<!-- \\|<!DOCTYPE ")))
2347 (xml-mode) 2347 (nxml-mode)
2348 (conf-mode))) 2348 (conf-mode)))
2349 2349
2350(defvar interpreter-mode-alist 2350(defvar interpreter-mode-alist
@@ -2442,7 +2442,7 @@ If FUNCTION is nil, then it is not called. (That is a way of saying
2442 . html-mode) 2442 . html-mode)
2443 ("<!DOCTYPE[ \t\r\n]+[Hh][Tt][Mm][Ll]" . html-mode) 2443 ("<!DOCTYPE[ \t\r\n]+[Hh][Tt][Mm][Ll]" . html-mode)
2444 ;; These two must come after html, because they are more general: 2444 ;; These two must come after html, because they are more general:
2445 ("<\\?xml " . xml-mode) 2445 ("<\\?xml " . nxml-mode)
2446 (,(let* ((incomment-re "\\(?:[^-]\\|-[^-]\\)") 2446 (,(let* ((incomment-re "\\(?:[^-]\\|-[^-]\\)")
2447 (comment-re (concat "\\(?:!--" incomment-re "*-->[ \t\r\n]*<\\)"))) 2447 (comment-re (concat "\\(?:!--" incomment-re "*-->[ \t\r\n]*<\\)")))
2448 (concat "[ \t\r\n]*<" comment-re "*!DOCTYPE ")) 2448 (concat "[ \t\r\n]*<" comment-re "*!DOCTYPE "))