# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 818917682 0
# Node ID 87eb8f956a0093e0e9ecae5a13a093ca613dee88
# Parent  de474a770e980291564923dcc0a3acf19d5b7f4d
(generate-file-autoloads): If no buffer visiting FILE exists, read it into
a temp buffer for processing without visiting it.

diff -r de474a770e98 -r 87eb8f956a00 lisp/emacs-lisp/autoload.el
--- a/lisp/emacs-lisp/autoload.el	Wed Dec 13 21:43:08 1995 +0000
+++ b/lisp/emacs-lisp/autoload.el	Thu Dec 14 05:08:02 1995 +0000
@@ -1,6 +1,6 @@
 ;;; autoload.el --- maintain autoloads in loaddefs.el.
 
-;;; Copyright (C) 1991, 1992, 1993, 1994 Free Software Foundation, Inc.
+;;; Copyright (C) 1991, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
 ;;;
 ;; Author: Roland McGrath <roland@gnu.ai.mit.edu>
 ;; Keywords: maint
@@ -150,7 +150,13 @@
     (save-excursion
       (unwind-protect
 	  (progn
-	    (set-buffer (find-file-noselect file))
+	    (if visited
+		(set-buffer visited)
+	      ;; It is faster to avoid visiting the file.
+	      (set-buffer (get-buffer-create " *generate-autoload-file*"))
+	      (kill-all-local-variables)
+	      (erase-buffer)
+	      (insert-file-contents file nil))
 	    (save-excursion
 	      (save-restriction
 		(widen)