branch: elpa/hyperdrive
commit 9ee220d67e535d02002731f061b00fa1e272b7f7
Author: Joseph Turner <jos...@ushin.org>
Commit: Joseph Turner <jos...@ushin.org>
Fix: (h/handler-default, h/write-buffer) Keep major mode if same
Reported-by: Adam Porter <a...@alphapapa.net>
---
hyperdrive-lib.el | 2 +-
hyperdrive.el | 2 +-
2 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el
index 67d6dba23f..4f8c20c201 100644
--- a/hyperdrive-lib.el
+++ b/hyperdrive-lib.el
@@ -1399,7 +1399,7 @@ If then, then call THEN with no arguments. Default
handler."
;; Check safe-p again after potential call to `h/mark-as-safe'.
(when (eq t (h/safe-p hyperdrive))
(let ((buffer-file-name (he/name entry)))
- (set-auto-mode)))
+ (set-auto-mode t)))
(when target
(pcase major-mode
('org-mode
diff --git a/hyperdrive.el b/hyperdrive.el
index 4d636ed341..f29b521016 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -514,7 +514,7 @@ use, see `hyperdrive-write'."
;; Check safe-p again after potential call to
`h/mark-as-safe'.
(when (eq t (h/safe-p hyperdrive))
(let ((buffer-file-name (he/name entry)))
- (set-auto-mode)))
+ (set-auto-mode t)))
(h/mode))
(he//fill entry (plz-response-headers response))
;; PUT responses only include ETag and Last-Modified
