Kaynağa Gözat

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 yıl önce
ebeveyn
işleme
6c2d37debf
1 değiştirilmiş dosya ile 1 ekleme ve 9 silme
  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