From 79c89927b6fd2f96f8cdfa3cabc32174affa72bf Mon Sep 17 00:00:00 2001
From: Thien-Thi Nguyen <ttn@gnuvola.org>
Date: Fri, 10 Dec 2004 16:51:43 +0000
Subject: [PATCH] (auto-mode-alist): Map .com to DCL mode.

---
 lisp/ChangeLog | 4 ++++
 lisp/files.el  | 1 +
 2 files changed, 5 insertions(+)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3521705b177..7fd5220828b 100644
--- 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,Al(B  <pot@gnu.org>
 
 	* Version 21.3 released.
diff --git a/lisp/files.el b/lisp/files.el
index 56f23043b10..cb002fdebd7 100644
--- 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>~.
-- 
2.39.2