emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs-26 1d599df: Fix last change to textmodes/page-ext.el


From: Stefan Monnier
Subject: [Emacs-diffs] emacs-26 1d599df: Fix last change to textmodes/page-ext.el
Date: Sat, 16 Sep 2017 20:10:38 -0400 (EDT)

branch: emacs-26
commit 1d599df5e0fbbc52e8592c0aff1d23e978c29b67
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>

    Fix last change to textmodes/page-ext.el
    
    * lisp/textmodes/page-ext.el (pages-directory): Make buffer writable
    while we build it (bug#28431).
---
 lisp/textmodes/page-ext.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/textmodes/page-ext.el b/lisp/textmodes/page-ext.el
index d744bd2..94b68de 100644
--- a/lisp/textmodes/page-ext.el
+++ b/lisp/textmodes/page-ext.el
@@ -583,6 +583,7 @@ directory for only the accessible portion of the buffer."
     (with-output-to-temp-buffer pages-directory-buffer
       (with-current-buffer standard-output
         (pages-directory-mode)
+        (setq buffer-read-only nil)
         (insert
          "==== Pages Directory: use `C-c C-c' to go to page under cursor. 
====" ?\n)
         (setq pages-buffer pages-target-buffer)
@@ -631,6 +632,7 @@ directory for only the accessible portion of the buffer."
                 )))))
 
       (set-buffer standard-output)
+      (setq buffer-read-only t)
       ;; Put positions in increasing order to go with buffer.
       (setq pages-pos-list (nreverse pages-pos-list))
       (if (called-interactively-p 'interactive)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]