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

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

[nongnu] elpa/hyperdrive 06ca835d69 32/82: Tidy: (hyperdrive--org-normal


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive 06ca835d69 32/82: Tidy: (hyperdrive--org-normalize-link) Add blank spaces
Date: Mon, 25 Sep 2023 19:00:52 -0400 (EDT)

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

    Tidy: (hyperdrive--org-normalize-link) Add blank spaces
---
 hyperdrive-org.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/hyperdrive-org.el b/hyperdrive-org.el
index 3a4dd3cd44..721b3f225f 100644
--- a/hyperdrive-org.el
+++ b/hyperdrive-org.el
@@ -187,6 +187,7 @@ Respects `hyperdrive-org-link-full-url' and 
`org-link-file-path-type'."
          (search-option (alist-get 'target (hyperdrive-entry-etc 
target-entry)))
          (host-format '(public-key)) (with-path t) (with-protocol t)
          fragment-prefix destination)
+
     (when (or hyperdrive-org-link-full-url
               (not (hyperdrive-entry-hyperdrive-equal-p
                     hyperdrive-current-entry target-entry)))
@@ -198,6 +199,7 @@ Respects `hyperdrive-org-link-full-url' and 
`org-link-file-path-type'."
          target-entry :fragment-prefix fragment-prefix
          :with-path with-path
          :with-protocol with-protocol :host-format host-format)))
+
     (if (hyperdrive-entry-equal-p hyperdrive-current-entry target-entry)
         ;; Link points to same file on same hyperdrive: make link
         ;; relative.
@@ -226,6 +228,7 @@ Respects `hyperdrive-org-link-full-url' and 
`org-link-file-path-type'."
                                    (file-relative-name
                                     (hyperdrive-entry-path target-entry)
                                     (file-name-directory 
(hyperdrive-entry-path target-entry)))))))))
+
       ;; Link points to same hyperdrive as the file the link is in:
       ;; make link relative.
       (setf destination (concat "./"



reply via email to

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