emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org-transclusion 5a080c503e: refactor(org-transclusion.


From: ELPA Syncer
Subject: [elpa] externals/org-transclusion 5a080c503e: refactor(org-transclusion.el): remove --ensure-new-line
Date: Mon, 8 May 2023 09:58:23 -0400 (EDT)

branch: externals/org-transclusion
commit 5a080c503edeef38262fb928158567caaf43c20a
Author: Noboru Ota <me@nobiot.com>
Commit: Noboru Ota <me@nobiot.com>

    refactor(org-transclusion.el): remove --ensure-new-line
    
    org-transclusion--ensure-new-line not needed (part of -src-lines.el)
---
 org-transclusion.el | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/org-transclusion.el b/org-transclusion.el
index 86c61cc83f..6b6d0a85f1 100644
--- a/org-transclusion.el
+++ b/org-transclusion.el
@@ -942,11 +942,6 @@ Return nil if not found."
 ;;-----------------------------------------------------------------------------
 ;;;; Functions for inserting content
 
-(defun org-transclusion--ensure-newline (str)
-  (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.
 Return t when successful.
@@ -976,7 +971,7 @@ based on the following arguments:
          (end-mkr)
          (ov-src (text-clone-make-overlay sbeg send sbuf)) ;; source-buffer 
overlay
          (tc-pair ov-src)
-         (content (org-transclusion--ensure-newline content)))
+         (content content))
     (when (org-transclusion-type-is-org type)
       (with-temp-buffer
         ;; This temp buffer needs to be in Org Mode



reply via email to

[Prev in Thread] Current Thread [Next in Thread]