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

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

[elpa] externals/taxy ce8d3eb 2/2: Change: (taxy-magit-section) Rename h


From: ELPA Syncer
Subject: [elpa] externals/taxy ce8d3eb 2/2: Change: (taxy-magit-section) Rename heading-indent slot to level-indent
Date: Fri, 24 Sep 2021 01:57:21 -0400 (EDT)

branch: externals/taxy
commit ce8d3ebdecb353e1dc2fca418f2bace5184e5d4c
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>

    Change: (taxy-magit-section) Rename heading-indent slot to level-indent
---
 examples/bookmarky.el |  2 +-
 examples/deffy.el     |  2 +-
 examples/diredy.el    |  2 +-
 taxy-magit-section.el | 15 +++++++--------
 4 files changed, 10 insertions(+), 11 deletions(-)

diff --git a/examples/bookmarky.el b/examples/bookmarky.el
index 86aa65f..d89970b 100644
--- a/examples/bookmarky.el
+++ b/examples/bookmarky.el
@@ -126,7 +126,7 @@ a slash."
                         (apply #'make-taxy-magit-section
                                :make #'make-fn
                                :format-fn #'format-item
-                               :heading-indent bookmarky-level-indent
+                               :level-indent bookmarky-level-indent
                                :visibility-fn visibility-fn
                                args)))
       (with-current-buffer (get-buffer-create buffer-name)
diff --git a/examples/deffy.el b/examples/deffy.el
index 22157d0..62f8170 100644
--- a/examples/deffy.el
+++ b/examples/deffy.el
@@ -156,7 +156,7 @@ buffer."
                         (apply #'make-taxy-magit-section
                                :make #'make-fn
                                :format-fn #'format-item
-                               :heading-indent deffy-level-indent
+                               :level-indent deffy-level-indent
                                :visibility-fn visibility-fn
                                ;; :heading-face-fn #'heading-face
                                args))
diff --git a/examples/diredy.el b/examples/diredy.el
index 0425afd..8e79e8b 100644
--- a/examples/diredy.el
+++ b/examples/diredy.el
@@ -65,7 +65,7 @@
              (make-fn (&rest args)
                       (apply #'make-taxy-magit-section
                              :make #'make-fn
-                             :heading-indent 1
+                             :level-indent 1
                              :item-indent 2
                              args)))
     (make-fn
diff --git a/taxy-magit-section.el b/taxy-magit-section.el
index 32fcad7..a233dbf 100644
--- a/taxy-magit-section.el
+++ b/taxy-magit-section.el
@@ -34,7 +34,7 @@
 
 ;;;; Variables
 
-(defvar taxy-magit-section-heading-indent 2
+(defvar taxy-magit-section-level-indent 2
   "Default heading indentation per level.")
 
 (defvar taxy-magit-section-item-indent 2
@@ -75,8 +75,7 @@ this does not disable indentation of section headings.")
   ;; performance, since slot accessors can't be optimized).
   (visibility-fn #'taxy-magit-section-visibility)
   (heading-face-fn (lambda (_depth) 'magit-section-heading))
-  ;; TODO: Rename heading-indent slot to level-indent.
-  (heading-indent 2)
+  (level-indent 2)
   (item-indent 2)
   (format-fn #'prin1-to-string))
 
@@ -110,7 +109,7 @@ which blank lines are inserted between sections at that 
level."
                             (indent-size (if (or (not 
taxy-magit-section-insert-indent-items)
                                                  (< depth 0))
                                              0
-                                           (+ (* depth 
(taxy-magit-section-heading-indent taxy))
+                                           (+ (* depth 
(taxy-magit-section-level-indent taxy))
                                               (taxy-magit-section-item-indent 
taxy))))
                             (indent-string (make-string indent-size ? )))
                        (add-text-properties 0 (length indent-string)
@@ -119,7 +118,7 @@ which blank lines are inserted between sections at that 
level."
                        (insert indent-string formatted "\n")))))
                 (insert-taxy
                  (taxy depth) (let ((magit-section-set-visibility-hook 
magit-section-set-visibility-hook)
-                                    (taxy-magit-section-heading-indent 
(taxy-magit-section-heading-indent taxy))
+                                    (taxy-magit-section-level-indent 
(taxy-magit-section-level-indent taxy))
                                     (taxy-magit-section-item-indent 
(taxy-magit-section-item-indent taxy)))
                                 (cl-typecase taxy
                                   (taxy-magit-section
@@ -128,7 +127,7 @@ which blank lines are inserted between sections at that 
level."
                                 (magit-insert-section (magit-section taxy)
                                   (magit-insert-heading
                                     (make-string (* (if (< depth 0) 0 depth)
-                                                    
(taxy-magit-section-heading-indent taxy))
+                                                    
(taxy-magit-section-level-indent taxy))
                                                  ? )
                                     (propertize (taxy-name taxy)
                                                 'face (funcall 
(taxy-magit-section-heading-face-fn taxy) depth))
@@ -187,8 +186,8 @@ Default visibility function for
 The macro is named \"PREFIX-define-column\".
 
 These customization options are defined, which are to be used in
-a `taxy-magit-section' in its `:heading-indent' and
-`:item-indent' slots, respectively:
+a `taxy-magit-section' in its `:level-indent' and `:item-indent'
+slots, respectively:
 
   - PREFIX-level-indent
   - PREFIX-item-indent



reply via email to

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