[elpa] externals/devdocs 2113d60: Expand relative links

[ELPA Syncer]

branch: externals/devdocs
commit 2113d600aa23c2ba21666635fa275a5ef1094f3d
Author: Augusto Stoffel <arstoffel@gmail.com>
Commit: Augusto Stoffel <arstoffel@gmail.com>

    Expand relative links
    
    Closes #3
---
 devdocs.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/devdocs.el b/devdocs.el
index a2fc46a..1d44957 100644
--- a/devdocs.el
+++ b/devdocs.el
@@ -37,6 +37,7 @@
 (require 'org-src)
 (require 'seq)
 (require 'shr)
+(require 'url-expand)
 (eval-when-compile
   (require 'let-alist))
 
@@ -272,7 +273,10 @@ with the order of appearance in the text."
   (pcase (string-to-char path)
     ('?/ path)
     ('?# (concat (devdocs--path-file base) path))
-    (_ (concat (file-name-directory base) path))))
+    (_ (substring ;; ugly!
+        (url-expander-remove-relative-links ;; undocumented function!
+         (concat (file-name-directory base) path))
+        1))))
 
 (defun devdocs--shr-tag-pre (dom)
   "Insert and fontify pre-tag represented by DOM."