(auto-mode-alist): Move .scm.[0-9] before nroff-mode.

Escape the second period.

diff --git a/lisp/files.el b/lisp/files.el
index 80f0b3fea8adf24b36eaf18aad723ab35c314be1..1c3c93878ccc0c1962cf25b590cfd244a5b76f27 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -866,8 +866,10 @@ run `normal-mode' explicitly."
                                  ("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 @@ run `normal-mode' explicitly."
                                  ("\\.y\\'" . c-mode)
                                  ("\\.lex\\'" . c-mode)
                                  ("\\.oak\\'" . scheme-mode)
-                                 ("\\.scm.[0-9]*\\'" . scheme-mode)
                                  ("\\.sgm\\'" . sgml-mode)
                                  ("\\.sgml\\'" . sgml-mode)
                                  ("\\.dtd\\'" . sgml-mode)