[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
| [Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/org-transclusion 5a080c503e: refactor(org-transclusion.el): remove --ensure-new-line,
ELPA Syncer <=