Got incomplete entry link when RSS <item> <link> is not full URL

[wakenmeng]

Hello,
I recently added a new rss feed: https://darkcoding.net/index.xml, but its <link> of <item> is relative path, not full URL:

<item>
<title>Overthinking Leetcode's Two Sum with SIMD</title>
<link>/software/two-sum/</link>
<pubDate>Sun, 09 Oct 2022 00:00:00 -0700</pubDate>
<guid>/software/two-sum/</guid>
<description>
When is the linear scan Two Sum solution faster than a map? What if we use AVX-512 instructions?
</description>
</item>

As you can see the item link is /software/two-sum/, and the elfeed entry url in the elfeed-search page is also this subpath. So when I enter this entry, the content is only the <description> part, which didn't request the full url to get the whole page.

I've been searching and cannot find relative config. How can I fix this?

[wakenmeng]

I am new to lisp, but I try to add a function to deal with the incomplete link, and the entry link is complete now, but the content page still only got description part, I guess I'm moving from elfeed-search to elfeed-show, and try to figure it out. I'm closing this cos it seems there's no relative config and I need to solve it myself.

diff --git a/elfeed.el b/elfeed.el
index bbfef26..28656da 100644
--- a/elfeed.el
+++ b/elfeed.el
@@ -334,6 +334,12 @@ If PROTOCOL is nil, returns URL."
                       :email (match-string 1 clean)))
         (list (list :email clean))))))

+(defun elfeed--fixup-host (host url)
+  "Prepend host to URL if it is a path, starts with a single slash"
+  (if (and host url (string-match-p "^/[^//]" url))
+      (concat "//" host url)
+      url))
+
 (defun elfeed-entries-from-rss (url xml)
   "Turn parsed RSS content into a list of elfeed-entry structs."
   (let* ((feed-id url)
@@ -347,9 +353,9 @@ If PROTOCOL is nil, returns URL."
     (cl-loop for item in (xml-query-all* (rss channel item) xml) collect
              (let* ((title (or (xml-query* (title *) item) ""))
                     (guid (xml-query* (guid *) item))
-                    (link (elfeed--fixup-protocol
-                           protocol
-                           (or (xml-query* (link *) item) guid)))
+                    (link (elfeed--fixup-protocol protocol
+                               (elfeed--fixup-host namespace
+                                         (or (xml-query* (link *) item) guid))))
                     (date (or (xml-query* (pubDate *) item)
                               (xml-query* (date *) item)))
                     (authors (nconc (elfeed--rss-author-to-plist