فهرست منبع

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

* 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.
Bastien Guerry 12 سال پیش
والد
کامیت
6c2d37debf
1فایلهای تغییر یافته به همراه1 افزوده شده و 9 حذف شده
  1. 1 9
      lisp/org-mobile.el

+ 1 - 9
lisp/org-mobile.el

@@ -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