From df174bb52b76bf1f80c16b66fe30134f6c277666 Mon Sep 17 00:00:00 2001 From: Kisaragi Hiu Date: Thu, 3 Sep 2020 11:02:10 +0900 Subject: [PATCH] Fix link extraction error when a file starts with blank lines (#1081) org-element-at-point doesn't just determine the closest element -- if it's "within blank lines at the beginning of buffer", it returns nil. ;; Within blank lines at the beginning of buffer, return nil. ((bobp) nil) Skip whitespace at beginning of buffer to avoid this. --- org-roam.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/org-roam.el b/org-roam.el index f57bfe1..c4fff27 100644 --- a/org-roam.el +++ b/org-roam.el @@ -586,7 +586,8 @@ it as FILE-PATH." (lambda (link) (let* ((type (org-element-property :type link)) (path (org-element-property :path link)) - (element (org-element-at-point)) + (element (progn (org-skip-whitespace) + (org-element-at-point))) (begin (or (org-element-property :content-begin element) (org-element-property :begin element))) (content (or (org-element-property :raw-value element)