X-Git-Url: https://git.donarmstrong.com/?p=org-ref.git;a=blobdiff_plain;f=org-ref.org;h=5a861776feb9307a605f82221392b29606a23ffc;hp=681043513a175bd3ced6e91133b09a19da05aa3d;hb=c40a50d52e4e81d0bc172a639f0b9437671b9c01;hpb=89e5e67f1b6774840cac214f38bf77e43aedf306 diff --git a/org-ref.org b/org-ref.org index 6810435..5a86177 100644 --- a/org-ref.org +++ b/org-ref.org @@ -1721,7 +1721,11 @@ construct the heading by hand." (goto-char (point-min)) ;; put new entry in notes if we don't find it. - (unless (re-search-forward (format ":Custom_ID: %s$" key) nil 'end) + (if (re-search-forward (format ":Custom_ID: %s$" key) nil 'end) + (progn + (show-subtree) + (outline-previous-visible-heading 1)) + ;; no entry found, so add one (insert (format "\n** TODO %s - %s" year title)) (insert (format" :PROPERTIES: