(auto-mode-alist): Map .com to DCL mode.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3521705b177936466947d5ae14a47cd8d100f87d..7fd5220828b93247b911988364208102de82442e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2004-12-10  Thien-Thi Nguyen  <ttn@gnu.org>
+
+       * files.el (auto-mode-alist): Map .com to DCL mode.
+
 2003-03-18  Francesco Potort\e,Al\e(B  <pot@gnu.org>
 
        * Version 21.3 released.

diff --git a/lisp/files.el b/lisp/files.el
index 56f23043b10a9c389bda9ab9a4361f4be96c8921..cb002fdebd7e4936d9434aad416e28daecfa2ef4 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1468,6 +1468,7 @@ in that case, this function acts as if `enable-local-variables' were t."
      ("BROWSE\\'" . ebrowse-tree-mode)
      ("\\.ebrowse\\'" . ebrowse-tree-mode)
      ("#\\*mail\\*" . mail-mode)
+     ("\\.com\\'" . dcl-mode)
      ;; Get rid of any trailing .n.m and try again.
      ;; This is for files saved by cvs-merge that look like .#<file>.<rev>
      ;; or .#<file>.<rev>-<rev> or VC's <file>.~<rev>~.