diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2017-12-04 22:21:25 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2017-12-04 22:21:25 +0100 |
commit | 494414028ab0f3f87e342bfccb69d32a89384fa7 (patch) | |
tree | e5d75ecd38ccdc650b349b720e261e850e2d0429 | |
parent | f8db6e0295bf522683f06469068bbf21e9a9f514 (diff) | |
parent | 66754e9042fcc1c6b7ec4cceb52bafc7a982b23e (diff) | |
download | org-mode-494414028ab0f3f87e342bfccb69d32a89384fa7.tar.gz |
Merge branch 'maint'
-rw-r--r-- | lisp/org-feed.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-feed.el b/lisp/org-feed.el index 0119864..cd2e95f 100644 --- a/lisp/org-feed.el +++ b/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) |