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

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

[nongnu] elpa/hyperdrive e88112f2d2: Fix: (hyperdrive-org-link-follow) A


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive e88112f2d2: Fix: (hyperdrive-org-link-follow) Add "hyper:" prefix
Date: Wed, 6 Sep 2023 21:59:46 -0400 (EDT)

branch: elpa/hyperdrive
commit e88112f2d2e44b7450450679bff183f33ba9519a
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>

    Fix: (hyperdrive-org-link-follow) Add "hyper:" prefix
---
 hyperdrive-org.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/hyperdrive-org.el b/hyperdrive-org.el
index 49eee8f88d..f7d4efafba 100644
--- a/hyperdrive-org.el
+++ b/hyperdrive-org.el
@@ -106,7 +106,9 @@ raw URL, not an Org link."
 (defun hyperdrive-org-link-follow (url &optional _prefix)
   ;; TODO: Do we need to do anything if prefix is used?
   "Follow hyperdrive URL."
-  (hyperdrive-open (hyperdrive-url-entry url)))
+  ;; Add "hyper:" prefix because Org strips the prefix for links that
+  ;; have been configured with `org-link-set-parameters'.
+  (hyperdrive-open (hyperdrive-url-entry (concat "hyper:" url))))
 
 (defun hyperdrive--org-link-goto (target)
   "Go to TARGET in current Org buffer.



reply via email to

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