branch: externals/org-transclusion
commit dcc481a54873a80100f70e13c31bc6496235f22e
Author: gggion <[email protected]>
Commit: gggion <[email protected]>
refactor: remove obsolete fringe propertize functions
Remove org-transclusion-propertize-source and
org-transclusion-propertize-transclusion functions which are no longer
used after switching from overlay properties to per-line text properties
for fringe indicators.
* org-transclusion.el (org-transclusion-propertize-source)
(org-transclusion-propertize-transclusion) : Remove function. Replaced
by org-transclusion-append-fringe-to-prefix and
org-transclusion-add-fringe-to-region which handle per-line prefix
preservation for source buffers.
Both old functions created uniform fringe indicators for overlay
properties. The new approach requires per-line processing to preserve
org-indent-mode's varying indentation, making these functions obsolete.
---
org-transclusion.el | 20 --------------------
1 file changed, 20 deletions(-)
diff --git a/org-transclusion.el b/org-transclusion.el
index 091f7df6c2..3fd3a1a475 100644
--- a/org-transclusion.el
+++ b/org-transclusion.el
@@ -1559,26 +1559,6 @@ used."
(get-char-property (point) 'text-clones))
t))
-(defun org-transclusion-propertize-transclusion ()
- "."
- (if (not (display-graphic-p))
- (propertize "| " 'face 'org-transclusion)
- (propertize
- "x"
- 'display
- '(left-fringe org-transclusion-fringe-bitmap
- org-transclusion-fringe))))
-
-(defun org-transclusion-propertize-source ()
- "."
- (if (not (display-graphic-p))
- (propertize "| " 'face 'org-transclusion-source)
- (propertize
- "x"
- `display
- `(left-fringe empty-line
- org-transclusion-source-fringe))))
-
(defun org-transclusion-type-is-org (type)
"Return non-nil if TYPE begins with \"org\".
TYPE is assumed to be a text-property \"org-transclusion-type\"
