X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=texi%2Finfohack.el;h=17b1f688cde5851fe2896a6c740f161a15380c5e;hb=4b0a1e283bd0bc10062015bb8d7729b061dfd8cb;hp=64856409c9177f40ab34e13f19748e0a13c57da6;hpb=c4cea997222af58c1f86b3e47ba2a6e918532b50;p=elisp%2Fgnus.git-

diff --git a/texi/infohack.el b/texi/infohack.el
index 6485640..17b1f68 100644
--- a/texi/infohack.el
+++ b/texi/infohack.el
@@ -41,6 +41,7 @@
 	(max-lisp-eval-depth (max max-lisp-eval-depth 600))
 	coding-system)
     (find-file file)
+    (setq buffer-read-only nil)
     (setq coding-system (if (boundp 'buffer-file-coding-system)
 			    buffer-file-coding-system
 			  file-coding-system))
@@ -79,6 +80,7 @@
     (condition-case err
 	(progn
 	  (find-file file)
+	  (setq buffer-read-only nil)
 	  (buffer-disable-undo (current-buffer))
 	  (if (boundp 'MULE)
 	      (setq output-coding-system file-coding-system)