Another mobile fix.

This commit is contained in:
Carsten Dominik 2009-10-15 15:33:11 +02:00
parent 6846edeba3
commit 93f3968e3f
1 changed files with 2 additions and 1 deletions

View File

@ -306,7 +306,8 @@ agenda view showing the flagged items."
(insert "#+TAGS: " (mapconcat 'identity tags " ") "\n")
(insert "#+DRAWERS: " (mapconcat 'identity drawers " ") "\n")
(insert "#+ALLPRIORITIES: A B C" "\n")
(when (file-exists-p "agendas.org")
(when (file-exists-p (expand-file-name
org-mobile-directory "agendas.org"))
(insert "* [[file:agendas.org][Agenda Views]]\n"))
(while (setq entry (pop files-alist))
(setq file (car entry)