Browse Source

org-feed: Fix parsing <guid>

* lisp/org-feed.el (org-feed-parse-rss-feed): Fix regexp for <guid>.

Fixes: 27711
Nicolas Goaziou 7 years ago
parent
commit
66754e9042
1 changed files with 1 additions and 1 deletions
  1. 1 1
      lisp/org-feed.el

+ 1 - 1
lisp/org-feed.el

@@ -624,7 +624,7 @@ containing the properties `:guid' and `:item-full-text'."
 	      end (and (re-search-forward "</item>" nil t)
 		       (match-beginning 0)))
 	(setq item (buffer-substring beg end)
-	      guid (if (string-match "<guid\\>.*?>\\(.*?\\)</guid>" item)
+	      guid (if (string-match "<guid\\>.*?>\\([^\000]*?\\)</guid>" item)
 		       (xml-substitute-special (match-string-no-properties 1 item))))
 	(setq entry (list :guid guid :item-full-text item))
 	(push entry entries)