Fix parenthesis bug

This commit is contained in:
Carsten Dominik 2009-10-04 17:50:49 +02:00
parent 3481fe28f4
commit 7a3bfe1f55

View file

@ -306,8 +306,8 @@ agenda view showing the flagged items."
(setq target-path (expand-file-name link-name org-mobile-directory)
target-dir (file-name-directory target-path))
(unless (file-directory-p target-dir)
(make-directory target-dir 'parents)
(copy-file file target-path 'ok-if-exists))))
(make-directory target-dir 'parents))
(copy-file file target-path 'ok-if-exists)))
(setq file (expand-file-name org-mobile-capture-file
org-mobile-directory))
(unless (file-exists-p file)