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

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

[elpa] externals/org 8fa7f0279e 1/2: org-html-link: Fix relative links w


From: ELPA Syncer
Subject: [elpa] externals/org 8fa7f0279e 1/2: org-html-link: Fix relative links with :html-link-use-abs-url
Date: Mon, 10 Jul 2023 06:58:18 -0400 (EDT)

branch: externals/org
commit 8fa7f0279e69f72c51731bda5cdee27df634d651
Author: Akira Kyle <akira@akirakyle.com>
Commit: Ihor Radchenko <yantar92@posteo.net>

    org-html-link: Fix relative links with :html-link-use-abs-url
    
    * lisp/ox-html.el (org-html-link): When publishing relative links with
    both :html-link-use-abs-url and :html-link-home, ensure the correct
    link is constructed.  Never append `home' to absolute paths.
    
    TINYCHANGE
---
 lisp/ox-html.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/ox-html.el b/lisp/ox-html.el
index 543c7eac42..64fec544ad 100644
--- a/lisp/ox-html.el
+++ b/lisp/ox-html.el
@@ -3227,7 +3227,7 @@ INFO is a plist holding contextual information.  See
                             (org-trim (plist-get info :html-link-home)))))
              (when (and home
                         (plist-get info :html-link-use-abs-url)
-                        (file-name-absolute-p raw-path))
+                        (not (file-name-absolute-p raw-path)))
                (setq raw-path (concat (file-name-as-directory home) 
raw-path))))
            ;; Maybe turn ".org" into ".html".
            (setq raw-path (funcall link-org-files-as-html-maybe raw-path info))



reply via email to

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