(set-auto-mode): If search for mode specification failed, look for an

interpreter specified on the first line.
This commit is contained in:
Eli Zaretskii 2005-12-16 15:44:39 +00:00
parent 812a8ed127
commit ec6328a24a
2 changed files with 8 additions and 1 deletions

View file

@ -1,3 +1,9 @@
2005-12-16 Klaus Zeitler <kzeitler@lucent.com>
* files.el (set-auto-mode): Look for an interpreter specified on
the first line also if search for mode specification succeeded,
but the mode is not known.
2005-12-16 Carsten Dominik <dominik@science.uva.nl>
* textmodes/org.el: (org-tags-match-list-sublevels): New option.

View file

@ -2098,7 +2098,8 @@ only set the major mode, if that would change it."
(setq done t)
(or (set-auto-mode-0 mode keep-mode-if-same)
;; continuing would call minor modes again, toggling them off
(throw 'nop nil)))))
(throw 'nop nil))))))
(unless done
;; If we didn't, look for an interpreter specified in the first line.
;; As a special case, allow for things like "#!/bin/env perl", which
;; finds the interpreter anywhere in $PATH.