Move point when inserting link to other Org mode item

This is the natural flow, as usually one continues writing after the link, not
before it.
Este commit está contenido en:
Daniel - 2021-04-01 16:49:45 +02:00
padre 6a590da9cb
commit 1916eb6736
No se encontró ninguna clave conocida en la base de datos para esta firma
ID de clave GPG: 1C7071A75BB72D64
Se han modificado 1 ficheros con 3 adiciones y 4 borrados

Ver fichero

@ -734,10 +734,9 @@ Use `org-store-link' to save link to `org-stored-links'."
(unless (derived-mode-p 'org-mode)
(user-error "Not in Org Mode"))
(let ((pom (db/org--get-location arg)))
(save-mark-and-excursion
(org-with-point-at pom
(org-store-link nil t))
(insert (apply #'format "[[%s][%s]]" (cl-first org-stored-links))))))
(org-with-point-at pom
(org-store-link nil t))
(insert (apply #'format "[[%s][%s]]" (cl-first org-stored-links)))))
(defun db/org-add-link-to-current-clock ()
"Insert link to currently clocked-in item at point.