Преглед на файлове

Fix bug with regexp target definition

Patch by Juan Pechiar
Carsten Dominik преди 14 години
родител
ревизия
2b26cb4e4e
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      lisp/org-capture.el

+ 1 - 1
lisp/org-capture.el

@@ -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))))