Mercurial > emacs

diff lisp/files.el @ 57772:c0463887998f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(set-auto-mode): Call `throw' correctly.
author John Paul Wallington <jpw@pobox.com>
date Thu, 28 Oct 2004 10:27:06 +0000
parents 9fe5facda191
children c139689dbd5d 4056279af756
line wrap: on
line diff
--- a/lisp/files.el	Thu Oct 28 09:02:04 2004 +0000
+++ b/lisp/files.el	Thu Oct 28 10:27:06 2004 +0000
@@ -1896,7 +1896,7 @@
 		(message "Ignoring unknown mode `%s'" mode)
 	      (setq done t)
 	      (or (set-auto-mode-0 mode)
-		  (throw 'nop)))))
+		  (throw 'nop nil)))))
       ;; 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.