branch: externals/org-transclusion
commit 4881798b9db82ba0c0b07999b512b8b8c6cf1840
Author: Benjamin Cherry <b...@devcarbon.com>
Commit: Benjamin Cherry <b...@devcarbon.com>

    Nil Safety
---
 org-transclusion-src-lines.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/org-transclusion-src-lines.el b/org-transclusion-src-lines.el
index aee70ce2f9..ff1af8239f 100644
--- a/org-transclusion-src-lines.el
+++ b/org-transclusion-src-lines.el
@@ -128,7 +128,8 @@ it means from line 10 to the end of file."
          (entry-pos) (buf)
          (lines (plist-get plist :lines))
          (end-search-op (plist-get plist :end))
-         (thing-at-point (make-symbol (plist-get plist :thing-at-point))))
+         (thing-at-point (plist-get plist :thing-at-point))
+         (thing-at-point (when thing-at-point (make-symbol thing-at-point))))
     (if (not (string= type "id")) (setq buf (find-file-noselect path))
       (let ((filename-pos (org-id-find path)))
         (setq buf (find-file-noselect (car filename-pos)))

Reply via email to