branch: elpa/hyperdrive
commit 09124e92303b07c04b67aa1e6a49edca1ad7a55a
Author: Adam Porter <a...@alphapapa.net>
Commit: Adam Porter <a...@alphapapa.net>
Fix: (hyperdrive-dir-find-file) Use pop-to-buffer
---
hyperdrive-dir.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/hyperdrive-dir.el b/hyperdrive-dir.el
index ebe555c2d1..f512bd9d0a 100644
--- a/hyperdrive-dir.el
+++ b/hyperdrive-dir.el
@@ -285,7 +285,7 @@ Interactively, visit file or directory at point in
(cl-assert entry nil "No file/directory at point")
(hyperdrive-open entry
:then (lambda ()
- (display-buffer (current-buffer) display-buffer-action))))
+ (pop-to-buffer (current-buffer) display-buffer-action))))
(defun hyperdrive-dir-find-file-other-window (entry)
"Visit hyperdrive ENTRY at point in other window.
