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

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

[nongnu] elpa/hyperdrive ee6b4b6921 2/6: Fix: (h/org--element-entry) Fol


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive ee6b4b6921 2/6: Fix: (h/org--element-entry) Follow file:-prefixed links within drive
Date: Sun, 9 Jun 2024 04:00:05 -0400 (EDT)

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

    Fix: (h/org--element-entry) Follow file:-prefixed links within drive
    
    As of this commit, we no longer treat file:-prefixed links as links
    to the user's local filesystem.  See DEV.org for an explanation.
---
 hyperdrive-org.el | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/hyperdrive-org.el b/hyperdrive-org.el
index 79c281e0fa..1f32555219 100644
--- a/hyperdrive-org.el
+++ b/hyperdrive-org.el
@@ -136,13 +136,9 @@ the logic for handling links of \"file\" type."
   "Return the hyperdrive entry for the Org CONTEXT.
 If CONTEXT does not correspond to a hyperdrive entry, return nil."
   (let* ((element-type (org-element-type context))
-         (link-type (org-element-property :type context))
-         (raw-link-type (org-element-property :raw-link context)))
+         (link-type (org-element-property :type context)))
     (and (eq element-type 'link)
          (equal "file" link-type)
-         ;; Don't treat link as a relative/absolute path in the
-         ;; hyperdrive if "file:" protocol prefix is explicit.
-         (not (string-prefix-p "file:" raw-link-type))
          (pcase-let*
              (((cl-struct hyperdrive-entry hyperdrive path) h/current-entry)
               (entry (he/create



reply via email to

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