From: Juri Linkov <juri@jurta.org>
Date: Tue, 9 May 2006 23:10:24 +0000 (+0000)
Subject: (archive-set-buffer-as-visiting-file): Bind buffer-undo-list
X-Git-Tag: emacs-pretest-22.0.90~2661
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ab3050bc5d919063e1146f87ccb09fc341ee2dbc;p=emacs.git

(archive-set-buffer-as-visiting-file): Bind buffer-undo-list
to t (undo-ask is reproducible by visiting nested archives).
---

diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el
index ac8ee271642..96b41eca88d 100644
--- a/lisp/arc-mode.el
+++ b/lisp/arc-mode.el
@@ -863,7 +863,8 @@ using `make-temp-file', and the generated name is returned."
   "Set the current buffer as if it were visiting FILENAME."
   (save-excursion
     (goto-char (point-min))
-    (let ((coding
+    (let ((buffer-undo-list t)
+	  (coding
 	   (or coding-system-for-read
 	       (and set-auto-coding-function
 		    (save-excursion