emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* [PATCH] Substitute a guid XML element in org-feed
@ 2015-09-27 18:24 Hiroshi Saito
  2015-09-30 11:57 ` Nicolas Goaziou
  2015-10-18 17:54 ` Michael Brand
  0 siblings, 2 replies; 6+ messages in thread
From: Hiroshi Saito @ 2015-09-27 18:24 UTC (permalink / raw)
  To: emacs-orgmode

[-- Attachment #1: Type: text/plain, Size: 112 bytes --]

Hi,

A guid XML element is not substituted in org-feed. Here is a patch to fix it.

--
Sincerely,
Hiroshi Saito

[-- Attachment #2: 0001-org-feed.el-Substitute-a-guid-XML-element.patch --]
[-- Type: application/octet-stream, Size: 977 bytes --]

From 1e0bb33bf929b77ae45694137c56b84587a8626c Mon Sep 17 00:00:00 2001
From: Hiroshi Saito <saidie@saidie.info>
Date: Mon, 28 Sep 2015 03:04:10 +0900
Subject: [PATCH] org-feed.el: Substitute a guid XML element

* lisp/org-feed.el (org-feed-parse-rss-feed): Substitute a guid XML
element with `xml-substitute-special'.

TINYCHANGE
---
 lisp/org-feed.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org-feed.el b/lisp/org-feed.el
index e511be0..d0da368 100644
--- a/lisp/org-feed.el
+++ b/lisp/org-feed.el
@@ -615,7 +615,7 @@ containing the properties `:guid' and `:item-full-text'."
 		       (match-beginning 0)))
 	(setq item (buffer-substring beg end)
 	      guid (if (string-match "<guid\\>.*?>\\(.*?\\)</guid>" item)
-		       (org-match-string-no-properties 1 item)))
+		       (xml-substitute-special (org-match-string-no-properties 1 item))))
 	(setq entry (list :guid guid :item-full-text item))
 	(push entry entries)
 	(widen)
-- 
2.5.3


^ permalink raw reply related	[flat|nested] 6+ messages in thread

end of thread, other threads:[~2015-11-14  8:30 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2015-09-27 18:24 [PATCH] Substitute a guid XML element in org-feed Hiroshi Saito
2015-09-30 11:57 ` Nicolas Goaziou
2015-10-18 17:54 ` Michael Brand
2015-10-18 23:49   ` Hiroshi Saito
2015-11-14  4:15     ` Hiroshi Saito
2015-11-14  8:32       ` Nicolas Goaziou

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).