mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-11-25 07:27:57 +00:00
Code

org-mobile.el: Fix the creation of the list of available tags.

Browse Source 
* org-mobile.el (org-mobile-create-index-file): Use
`org-global-tags-completion-table' instead of
`org-tag-alist-for-agenda' to get the tags for the index file.

Thanks to James Harkins who helped figuring out the problem here.
This commit is contained in:
Bastien Guerry 2012-08-03 14:30:18 +02:00
parent bf36319582
commit 6c2d37debf
1 changed files with 1 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/org-mobile.el
View File

@ -424,15 +424,7 @@ agenda view showing the flagged items."
done-kwds
(org-uniquify org-todo-keywords-for-agenda)))
(setq drawers (org-uniquify org-drawers-for-agenda))
(setq tags (org-uniquify
(delq nil
(mapcar
(lambda (e)
(cond ((stringp e) e)
((listp e)
(if (stringp (car e)) (car e) nil))
(t nil)))
org-tag-alist-for-agenda))))
(setq tags (mapcar 'car (org-global-tags-completion-table org-mobile-files-alist)))
(with-temp-file
(if org-mobile-use-encryption
org-mobile-encryption-tempfile