From 0515ae29c01fa299a53cabab12b54b7464e3b0c8 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Wed, 19 May 2010 11:37:08 +0200 Subject: [PATCH] Fix `org-refile-cache-get' error. This patch fixes the problem first reported by Tassilo Horn in [mid:87y6fhxc47.fsf@thinkpad.tsdh.de]. Problem was that `org-refile-cache-get' returned an invalid refile target table after the refile cache was cleared. --- lisp/ChangeLog | 5 +++++ lisp/org.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7cc28e451..01672a09b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-05-19 David Maus + + * org.el (org-refile-cache-get): Return empty list of targets + when cache was cleared. + 2010-05-17 Carsten Dominik * org.el (org-refile-use-cache): New option. diff --git a/lisp/org.el b/lisp/org.el index d002dabcd..4ede91f1c 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -9526,7 +9526,7 @@ on the system \"/user@host:\"." "Retrieve the cached value for refile targets given by IDENTIFIERS." (cond ((not org-refile-cache) nil) - ((not org-refile-use-cache) (org-refile-cache-clear)) + ((not org-refile-use-cache) (org-refile-cache-clear) nil) (t (let ((set (cdr (assoc (sha1 (prin1-to-string identifiers)) org-refile-cache))))