From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Thu, 17 Sep 2020 16:02:44 +0000 (+0200)
Subject: Make package install not bug out on weird stuff in find-file-hooks
X-Git-Tag: emacs-28.0.90~6032
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=64ba14f3661f163ebac431293c92e8b22bb31f9c;p=emacs.git

Make package install not bug out on weird stuff in find-file-hooks

* lisp/emacs-lisp/autoload.el (autoload-find-generated-file):
Users may have read-only-mode in find-file-hooks (bug#43460) so
just disable all the hooks here.
---

diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el
index 2eef4512009..80ac90895af 100644
--- a/lisp/emacs-lisp/autoload.el
+++ b/lisp/emacs-lisp/autoload.el
@@ -258,6 +258,7 @@ expression, in which case we want to handle forms differently."
   "Visit the autoload file for the current buffer, and return its buffer."
   (let ((enable-local-variables :safe)
         (enable-local-eval nil)
+        (find-file-hooks nil)
         (delay-mode-hooks t)
         (file (autoload-generated-file)))
     ;; We used to use `raw-text' to read this file, but this causes