# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 806021286 0
# Node ID fdc58e7e37c21e2e715fa38863ac2c2e42bdc6b9
# Parent  ce881909d36a6842ba9ba2afb3aa3cc96d138d54
(auto-mode-alist): Move .scm.[0-9] before nroff-mode.
Escape the second period.

diff -r ce881909d36a -r fdc58e7e37c2 lisp/files.el
--- a/lisp/files.el	Mon Jul 17 22:47:19 1995 +0000
+++ b/lisp/files.el	Mon Jul 17 22:48:06 1995 +0000
@@ -866,8 +866,10 @@
 				  ("changelo\\'" . change-log-mode)
 				  ("ChangeLog.[0-9]+\\'" . change-log-mode)
 				  ("\\$CHANGE_LOG\\$\\.TXT" . change-log-mode)
-;; The following should come after the ChangeLog pattern
-;; for the sake of ChangeLog.1, etc.
+				  ("\\.scm\\.[0-9]*\\'" . scheme-mode)
+;;; The following should come after the ChangeLog pattern
+;;; for the sake of ChangeLog.1, etc.
+;;; and after the .scm.[0-9] pattern too.
 				  ("\\.[12345678]\\'" . nroff-mode)
 				  ("\\.TeX\\'" . tex-mode)
 				  ("\\.sty\\'" . latex-mode)
@@ -892,7 +894,6 @@
 				  ("\\.y\\'" . c-mode)
 				  ("\\.lex\\'" . c-mode)
 				  ("\\.oak\\'" . scheme-mode)
-				  ("\\.scm.[0-9]*\\'" . scheme-mode)
 				  ("\\.sgm\\'" . sgml-mode)
 				  ("\\.sgml\\'" . sgml-mode)
 				  ("\\.dtd\\'" . sgml-mode)