From 19b481d025e21f75e3d2eb0a1aaffca1a2de52a1 Mon Sep 17 00:00:00 2001 From: "Tom Breton (Tehom)" Date: Fri, 24 Dec 2010 15:54:33 -0500 Subject: [PATCH] Rearranged elinstall-actions-for-source-file, can correctly stop early. --- elinstall.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/elinstall.el b/elinstall.el index ca5e9f7..8a7956b 100644 --- a/elinstall.el +++ b/elinstall.el @@ -1058,7 +1058,8 @@ Special variables are as noted in \"List of special variables\"." (when (and (file-readable-p full-path) - (not (auto-save-file-name-p full-path))) + (not (auto-save-file-name-p full-path)) + (string-match emacs-lisp-file-regexp filename)) (let* ( (visited (get-file-buffer full-path)) @@ -1080,7 +1081,6 @@ Special variables are as noted in \"List of special variables\"." ;;Figure out whether to run some actions, by file local vars. (autoloads-p (and - (string-match emacs-lisp-file-regexp filename) (ignore-errors (with-current-buffer buf (not no-update-autoloads))) @@ -1093,7 +1093,6 @@ Special variables are as noted in \"List of special variables\"." (and byte-compile (featurep 'byte-compile) - (string-match emacs-lisp-file-regexp filename) (ignore-errors (with-current-buffer buf (not no-byte-compile))) -- 2.11.4.GIT