diff --git a/ChangeLog b/ChangeLog index a4ef3361..28f77aef 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2026-04-02 Mats Lidell + +* hsys-org.el (hsys-org-id-find-advice): Fix docstring has wrong usage + of unescaped single quotes and make first line a sentence. + 2026-03-30 Mats Lidell * test/kotl-mode-tests.el (kotl-mode-split-cell): Use kotl-mode:kill-tree diff --git a/hsys-org.el b/hsys-org.el index 605d15c2..9d0e185f 100644 --- a/hsys-org.el +++ b/hsys-org.el @@ -217,10 +217,11 @@ otherwise, just match to the single tag around point." (hsys-org-get-agenda-tags #'hywiki-tags-view)) (defun hsys-org-id-find-advice (&rest _) - "If `org-roam' is loaded and has advised `org-id-find' with the function -'org-roam-id-find' but Emacs does not have the `sqlite' module, then any -call to `org-id-find' will fail. This :before advice function fixes this -by removing the `org-roam' advice from `org-id-find'." + "Remove the `org-roam' advice from `org-id-find' if present. +If `org-roam' is loaded and has advised `org-id-find' with the function +`org-roam-id-find' but Emacs does not have the `sqlite' module, then any +call to `org-id-find' will fail. This :before advice function fixes this by +removing the `org-roam' advice from `org-id-find'." (when (and (fboundp 'org-roam-id-find) (not (hypb:sqlite-p)) (hypb:advised-p 'org-id-find 'org-roam-id-find))