awesome-emacs/nursery
1
0
Fork 0
mirror of https://github.com/chrisbarrett/nursery synced 2025-09-22 16:20:55 -05:00
Code Issues Packages Projects Releases Wiki Activity

Run hook after renaming a node

Browse Source
This commit is contained in:
Chris Barrett
2022-09-26 18:23:01 +13:00
parent 6bc6b32173
commit be2e163bca
1 changed files with 9 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/org-roam-rewrite.el
View File

@@ -72,6 +72,13 @@ from the original node: :title, :level, :file, :id"
:group 'org-roam-rewrite :group 'org-roam-rewrite
:type 'hook) :type 'hook)
(defcustom org-roam-rewrite-node-renamed-hook nil
"Hook executed after renaming a node.
It is called with the renamed node as the current buffer."
:group 'org-roam-rewrite
:type 'hook)
(defun org-roam-rewrite--set-title-keyword (text) (defun org-roam-rewrite--set-title-keyword (text)
@@ -199,7 +206,8 @@ descriptions updated to this value."
(org-roam-rewrite--edit-backlinks backlinks (org-roam-node-id node) new-title) (org-roam-rewrite--edit-backlinks backlinks (org-roam-node-id node) new-title)
(message "Rewrote %s links to node." (length backlinks))) (message "Rewrote %s links to node." (length backlinks)))
(t (t
(message "Rename completed."))))))) (message "Rename completed.")))))
(run-hooks 'org-roam-rewrite-node-renamed-hook)))
;;;###autoload ;;;###autoload
(defun org-roam-rewrite-remove (from to link-desc) (defun org-roam-rewrite-remove (from to link-desc)