From 82349b640bb79897cb6e198f1d5d0b945ae8c38b Mon Sep 17 00:00:00 2001 From: Chris Barrett Date: Wed, 14 Sep 2022 11:38:05 +1200 Subject: [PATCH] :lipstick: comment --- lisp/org-roam-rewrite.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/org-roam-rewrite.el b/lisp/org-roam-rewrite.el index a206e25..d817cd0 100644 --- a/lisp/org-roam-rewrite.el +++ b/lisp/org-roam-rewrite.el @@ -115,8 +115,11 @@ It is called with the new node as the current buffer." (dolist (backlink (seq-sort-by #'org-roam-backlink-point #'> backlinks)) (goto-char (org-roam-backlink-point backlink)) (save-match-data + ;; This *shouldn't* happen, but I've seen it a few times and I'm not + ;; sure why. (when (org-at-property-drawer-p) (error "Unexpected attempt to edit property drawer")) + (when (looking-at org-link-any-re) (replace-match replacement t t)))) (write-region (point-min) (point-max) file))))