From 93f3968e3f6cb5bf29a2d089457676c5b4a7b694 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Thu, 15 Oct 2009 15:33:11 +0200 Subject: [PATCH] Another mobile fix. --- lisp/org-mobile.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/org-mobile.el b/lisp/org-mobile.el index d86f77616..13832447b 100644 --- a/lisp/org-mobile.el +++ b/lisp/org-mobile.el @@ -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)