🚀 go-pugleaf

In GNU Emacs 19.25.1 of Fri Jun 10 1994 on hal1 (rs6000-ibm-aix3.2)

In the function set-auto-mode (files.el),
the inhibit-first-line-modes-regexps   should be tested
against the file name without version, just as it is done with the
auto-mode-alist.


diff -u /software/emacs-19.25/lisp/files.el /var/tmp/files.el
--- /software/emacs-19.25/lisp/files.el	Sat Sep 17 00:22:54 1994
+++ /var/tmp/files.el	Sat Sep 17 00:22:54 1994
@@ -888,10 +888,11 @@
       (and enable-local-variables
 	   ;; Don't look for -*- if this file name matches any
 	   ;; of the regexps in inhibit-first-line-modes-regexps.
-	   (let ((temp inhibit-first-line-modes-regexps))
+	   (let ((temp inhibit-first-line-modes-regexps)
+		 (name (file-name-sans-versions buffer-file-name)))
 	     (while (and temp
 			 (not (string-match (car temp)
-					    buffer-file-name)))
+					    name)))
 	       (setq temp (cdr temp)))
 	     (not temp))
 	   (search-forward "-*-" (save-excursion