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)))