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

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

[elpa] externals/org-transclusion 2751fbc7d0 6/9: refactor: remove unuse


From: ELPA Syncer
Subject: [elpa] externals/org-transclusion 2751fbc7d0 6/9: refactor: remove unused let variable
Date: Wed, 29 Mar 2023 16:59:08 -0400 (EDT)

branch: externals/org-transclusion
commit 2751fbc7d0315c961f3481ea67786ecd9f378cdc
Author: Noboru Ota <me@nobiot.com>
Commit: Noboru Ota <me@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 2f4b69ac26..b0aaafdc8d 100644
--- a/org-transclusion-src-lines.el
+++ b/org-transclusion-src-lines.el
@@ -262,9 +262,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)))



reply via email to

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