branch: externals/org-transclusion
commit ccc7870f0740d8fec2cbdb814ce10b6f6649ecb4
Author: Benjamin Cherry <b...@devcarbon.com>
Commit: Noboru Ota <m...@nobiot.com>
Fixup
---
org-transclusion.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/org-transclusion.el b/org-transclusion.el
index ed6cf3ba5c..bca8f3f235 100644
--- a/org-transclusion.el
+++ b/org-transclusion.el
@@ -950,8 +950,9 @@ Return nil if not found."
;;;; Functions for inserting content
(defun org-transclusion--ensure-newline (str)
- (when (not (string-suffix-p "\n" str))
- (concat str "\n")))
+ (if (not (string-suffix-p "\n" str))
+ (concat str "\n")
+ str))
(defun org-transclusion-content-insert (keyword-values type content sbuf sbeg
send copy)
"Insert CONTENT at point and put source overlay in SBUF.
