>From 269c6b3b0ec84d2c5478a7ac9cb0e49cfd2ca486 Mon Sep 17 00:00:00 2001 From: Magnus Henoch Date: Wed, 15 Apr 2009 11:37:15 +0100 Subject: [PATCH] * org-feed.el (org-feed-update): Use sha1 instead of org-sha1-string. --- lisp/org-feed.el | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/org-feed.el b/lisp/org-feed.el index 55b14bc..9c64bff 100644 --- a/lisp/org-feed.el +++ b/lisp/org-feed.el @@ -327,7 +327,7 @@ it can be a list structured like an entry in `org-feed-alist'." (push e new) (setq olds (nth 2 (assoc (plist-get e :guid) old-status))) (if (and olds - (not (string= (org-sha1-string + (not (string= (sha1 (plist-get e :item-full-text)) olds))) (push e changed)))) @@ -361,7 +361,7 @@ it can be a list structured like an entry in `org-feed-alist'." ;; or if they were handled previously (if (assoc guid guid-alist) t (plist-get e :handled)) ;; A hash, to detect changes - (org-sha1-string (plist-get e :item-full-text)))) + (sha1 (plist-get e :item-full-text)))) entries)) ;; Handle new items in the feed -- 1.6.0.2