changeset 57772:c0463887998f

(set-auto-mode): Call `throw' correctly.
author John Paul Wallington <jpw@pobox.com>
date Thu, 28 Oct 2004 10:27:06 +0000
parents 588351906974
children 360e8a38d179
files lisp/files.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
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.