X-Git-Url: https://git.donarmstrong.com/?p=org-ref.git;a=blobdiff_plain;f=org-ref.org;h=97d047247574cdef8d8697ad4fcbd5c9c28c55f9;hp=681043513a175bd3ced6e91133b09a19da05aa3d;hb=97a06ccf1e42682d284f7780366ce381d54733a0;hpb=74d2da38b565cb1358b0a5ed14222729e6e436cd diff --git a/org-ref.org b/org-ref.org index 6810435..97d0472 100644 --- a/org-ref.org +++ b/org-ref.org @@ -1721,7 +1721,12 @@ 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 + (org-show-entry) + (outline-previous-visible-heading 1) + (recenter-top-bottom 0)) + ;; no entry found, so add one (insert (format "\n** TODO %s - %s" year title)) (insert (format" :PROPERTIES: