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

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

[nongnu] elpa/hyperdrive 2b4ade87bc 2/2: Change: (-dir--yank-media-image


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive 2b4ade87bc 2/2: Change: (-dir--yank-media-image-handler) Open image, not parent
Date: Thu, 7 Sep 2023 03:59:52 -0400 (EDT)

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

    Change: (-dir--yank-media-image-handler) Open image, not parent
---
 hyperdrive-dir.el | 14 +-------------
 1 file changed, 1 insertion(+), 13 deletions(-)

diff --git a/hyperdrive-dir.el b/hyperdrive-dir.el
index babe267e8e..76eaceed57 100644
--- a/hyperdrive-dir.el
+++ b/hyperdrive-dir.el
@@ -375,19 +375,7 @@ see Info node `(elisp)Yanking Media'."
         :body-type 'binary
         ;; TODO: Pass MIME type in a header? hyper-gateway detects it for us.
         :body image :as 'response
-        :then (lambda (_res)
-                (hyperdrive-open parent
-                  :then (lambda ()
-                          (ewoc-goto-node ewoc
-                                          (hyperdrive-ewoc-find-node ewoc entry
-                                            :predicate (lambda (a b)
-                                                         (equal 
(hyperdrive-entry-path a)
-                                                                
(hyperdrive-entry-path b)))))
-                          (recenter)
-                          ;; FIXME: Newly-added file is not highlit. Calling
-                          ;; the `then' callback in a queue finalizer inside
-                          ;; `hyperdrive-dir-handler' should fix this.
-                          )))
+        :then (lambda (_res) (hyperdrive-open entry))
         :else (lambda (plz-error)
                 (hyperdrive-message "Unable to yank media: %S" plz-error)))))
 



reply via email to

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