1
0
Fork 0

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.
Dieser Commit ist enthalten in:
Daniel - 2021-04-01 16:49:45 +02:00
Ursprung 6a590da9cb
Commit 1916eb6736
Es konnte kein GPG-Schlüssel zu dieser Signatur gefunden werden
GPG-Schlüssel-ID: 1C7071A75BB72D64
1 geänderte Dateien mit 3 neuen und 4 gelöschten Zeilen

Datei anzeigen

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