branch: externals/org-transclusion
commit 9db0791c07c08d369e9eaf1a63b0c28a184d941e
Author: Noboru Ota <m...@nobiot.com>
Commit: Noboru Ota <m...@nobiot.com>
refactor: remove unused let variable
---
org-transclusion-src-lines.el | 4 +---
1 file changed, 1 insertion(+), 3 deletions(-)
diff --git a/org-transclusion-src-lines.el b/org-transclusion-src-lines.el
index a4d01919a9..97fdbf3583 100644
--- a/org-transclusion-src-lines.el
+++ b/org-transclusion-src-lines.el
@@ -296,9 +296,7 @@ for non-Org text files including program source files."
(src-ov . tc-ov) (org-transclusion-live-sync-buffers-others-default
nil)
(save-mark-and-excursion
(org-babel-mark-block)
- (let* ((tc-ov-beg-mkr (get-text-property (point)
'org-transclusion-beg-mkr))
- (tc-ov-end-mkr (get-text-property (point)
'org-transclusion-end-mkr))
- (src-ov-length (- (overlay-end src-ov) (overlay-start
src-ov)))
+ (let* ((src-ov-length (- (overlay-end src-ov) (overlay-start
src-ov)))
(region-length (- (region-end) (region-beginning)))
(overlay-has-extra-newline (= 1 (- region-length
src-ov-length)))
(newline-offset (if overlay-has-extra-newline 1 0)))
