Fix bug with regexp target definition

Patch by Juan Pechiar
This commit is contained in:
Carsten Dominik 2010-06-25 20:53:15 +02:00
parent e8c7796868
commit 2b26cb4e4e
1 changed files with 1 additions and 1 deletions

View File

@ -556,7 +556,7 @@ already gone."
((eq (car target) 'file+regexp)
(set-buffer (org-capture-target-buffer (nth 1 target)))
(goto-char (point-min))
(if (re-search-forward (nth 1 target) nil t)
(if (re-search-forward (nth 2 target) nil t)
(progn
(goto-char (match-beginning 0))
(setq target-entry-p (and (org-mode-p) (org-at-heading-p))))