Fix bug with including archive files in org-mobile-files

This commit is contained in:
Carsten Dominik 2009-11-05 13:48:01 +01:00
parent b4b539cb22
commit 86e2ff60d1
1 changed files with 2 additions and 1 deletions

View File

@ -179,7 +179,8 @@ using `rsync' or `scp'.")
"Expand the list in `org-mobile-files' to a list of existing files."
(let* ((include-archives
(and (member 'org-agenda-text-search-extra-files org-mobile-files)
(member 'agenda-archives org-agenda-text-search-extra-files)))
(member 'agenda-archives org-agenda-text-search-extra-files)
t))
(files
(apply 'append
(mapcar