Fix bugs in org-mobile.el

This commit is contained in:
Carsten Dominik 2009-10-12 23:59:43 +02:00
parent 206c717410
commit 7a7fa921f7
1 changed files with 2 additions and 2 deletions

View File

@ -712,7 +712,7 @@ as a string."
(setq lmin (1+ level) lmax (+ lmin (if org-odd-levels-only 1 0)))
(setq end (save-excursion (org-end-of-subtree t t))))
(when (org-on-heading-p)
(throw 'exit (move-marker (make-marker) (point)))))))))
(move-marker (make-marker) (point))))))))
(defun org-mobile-locate-entry (link)
(if (string-match "\\`id:\\(.*\\)$" link)