emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[nongnu] elpa/hyperdrive 6a7b855be0 1/3: Fix: (h/handler-html) Don't pro


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive 6a7b855be0 1/3: Fix: (h/handler-html) Don't prompt to save hyperdrive EWW buffers
Date: Mon, 15 Jul 2024 19:00:00 -0400 (EDT)

branch: elpa/hyperdrive
commit 6a7b855be00587c741ded1885fd60008d9298498
Author: Joseph Turner <joseph@ushin.org>
Commit: Joseph Turner <joseph@ushin.org>

    Fix: (h/handler-html) Don't prompt to save hyperdrive EWW buffers
    
    Resolves <https://todo.sr.ht/~ushin/ushin/198>.
---
 hyperdrive-lib.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el
index 907991b3d0..60fd48e401 100644
--- a/hyperdrive-lib.el
+++ b/hyperdrive-lib.el
@@ -1408,6 +1408,11 @@ with `hyperdrive-handler-default'."
           (h/mode)
           (setf buffer (current-buffer)))
         (set-buffer buffer)
+        ;; Since the buffer is modified (by `eww') and
+        ;; `write-contents-functions' is set (by `hyperdrive-mode'), Emacs
+        ;; prompts to save before killing the EWW buffer.  To avoid this, set
+        ;; `buffer-modified-p' flag to nil.
+        (set-buffer-modified-p nil)
         (when then
           (funcall then)))
     (h/handler-default entry :then then)))



reply via email to

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