branch: externals/org-transclusion
commit 571dd7224bfd89d551c61f232849c19d5b389729
Author: gggion <[email protected]>
Commit: gggion <[email protected]>
fix: byte-compiler warnings in org-transclusion-indent-mode
* org-transclusion-indent-mode.el: Add forward declarations for
functions and variables to silence byte-compiler warnings.
(org-transclusion-indent-mode): Add defvar declaration for variable
defined later by define-minor-mode.
(org-transclusion-prefix-has-fringe-p)
(org-transclusion-add-fringe-to-region): Add declare-function forms
for functions defined in org-transclusion.el.
(org-transclusion-indent--reapply-all-fringes): Remove unused
lexical variable line-end.
---
org-transclusion-indent-mode.el | 10 ++++++++--
1 file changed, 8 insertions(+), 2 deletions(-)
diff --git a/org-transclusion-indent-mode.el b/org-transclusion-indent-mode.el
index c4d8a53bff..75c08b8428 100644
--- a/org-transclusion-indent-mode.el
+++ b/org-transclusion-indent-mode.el
@@ -52,7 +52,14 @@ Used to prevent premature mode deactivation during buffer
refresh.")
"Initialization state for waiting on org-indent.
Either nil, t (initialized), or (TIMER ATTEMPT-COUNT).")
-;;;; Helper Functions
+;;;; Forward Declarations
+
+;; Silence byte-compiler warnings for functions defined in org-transclusion.el
+(declare-function org-transclusion-prefix-has-fringe-p "org-transclusion"
(prefix))
+(declare-function org-transclusion-add-fringe-to-region "org-transclusion"
(buffer beg end face))
+
+;; Variable defined by define-minor-mode later in this file
+(defvar org-transclusion-indent-mode)
(defun org-transclusion-indent--find-source-overlays ()
"Return list of all transclusion source overlays in current buffer."
@@ -82,7 +89,6 @@ This function is called after any change that might have
removed
(save-excursion
(goto-char ov-beg)
(let* ((line-beg (line-beginning-position))
- (line-end (min (1+ line-beg) ov-end))
(line-prefix (get-text-property line-beg 'line-prefix)))
;; If line-prefix exists but has no fringe, re-apply
(when (and line-prefix
