Mercurial > hg > xemacs-beta

diff lisp/autoload.el @ 306:9ea74add5d37 r21-0b51

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b51
author cvs
date Mon, 13 Aug 2007 10:41:58 +0200
parents 084402c475ba
children 8e84bee8ddd0
line wrap: on
line diff
--- a/lisp/autoload.el	Mon Aug 13 10:41:13 2007 +0200
+++ b/lisp/autoload.el	Mon Aug 13 10:41:58 2007 +0200
@@ -375,6 +375,8 @@
 	(let ((find-file-hooks nil))
 	  (set-buffer (or (get-file-buffer generated-autoload-file)
 			  (find-file-noselect generated-autoload-file))))
+	;; Make sure we can scribble in it.
+	(setq buffer-read-only nil)
 	;; First delete all sections for this file.
 	(goto-char (point-min))
 	(while (search-forward generate-autoload-section-header nil t)