Mercurial > emacs

changeset 12962:bc084caba958

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(executable-set-magic): Use make-local-hook for after-save-hook.
author Richard M. Stallman <rms@gnu.org>
date Mon, 28 Aug 1995 15:12:57 +0000
parents e8028ecec7ea
children 337ba86981f5
files lisp/progmodes/executable.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/executable.el	Mon Aug 28 15:09:57 1995 +0000
+++ b/lisp/progmodes/executable.el	Mon Aug 28 15:12:57 1995 +0000
@@ -182,8 +182,8 @@
       (let ((point (point-marker))
 	    (buffer-modified-p (buffer-modified-p)))
 	(goto-char (point-min))
-	(make-local-variable 'after-save-hook)
-	(add-hook 'after-save-hook 'executable-chmod)
+	(make-local-hook 'after-save-hook)
+	(add-hook 'after-save-hook 'executable-chmod nil t)
 	(if (looking-at "#![ \t]*\\(.*\\)$")
 	    (and (goto-char (match-beginning 1))
 		 (not (string= argument