[nongnu] elpa/treesit-fold 1bc43aa561 254/417: updated line-reminder compatibility in README (#50)

[ELPA Syncer]

branch: elpa/treesit-fold
commit 1bc43aa56140bccdc5ee8435aa388c9a6f0d46d5
Author: Hank Greenburg <ragreenburg@gmail.com>
Commit: GitHub <noreply@github.com>

    updated line-reminder compatibility in README (#50)
---
 README.md | 29 ++++++++++++++++++++++-------
 1 file changed, 22 insertions(+), 7 deletions(-)

diff --git a/README.md b/README.md
index 1f39e665b3..54e54f630b 100644
--- a/README.md
+++ b/README.md
@@ -460,13 +460,28 @@ turn off `ts-fold-mode`
   with this plugin.
 
   ```elisp
-  (setq ts-fold-indicators-face-function
-     (lambda (pos &rest _)
-       (let ((ln (line-number-at-pos pos)))
-         (cond
-          ((memq ln line-reminder--change-lines) 
'line-reminder-modified-sign-face)
-          ((memq ln line-reminder--saved-lines) 'line-reminder-saved-sign-face)
-          (t nil)))))
+(defmacro fold-line-reminder (symbols where &rest body)
+  "Global advice-add utility."
+  (declare (indent 2))
+  `(cond ((listp ,symbols)
+          (dolist (symbol ,symbols)
+            (advice-add symbol ,where (lambda (&optional arg0 &rest args) 
,@body))))
+         (t (advice-add ,symbols ,where (lambda (&optional arg0 &rest args) 
,@body)))))
+
+(use-package ts-fold
+  :hook (tree-sitter-after-on . ts-fold-line-comment-mode)
+  :hook (tree-sitter-after-on . ts-fold-indicators-mode)
+  :init
+  (setq ts-fold-indicators-fringe 'left-fringe
+        ts-fold-indicators-face-function
+        (lambda (pos &rest _)
+          ;; Return the face of it's function.
+          (line-reminder--get-face (line-number-at-pos pos t))))
+  :config
+  (require 'line-reminder)
+  (fold-line-reminder 'line-reminder-transfer-to-saved-lines :after
+    ;; Refresh indicators for package `ts-fold'.
+    (ts-fold-indicators-refresh)))
   ```
 
 ### 📝 Summary