branch: externals/bufferlo
commit a9d4c37affa85dccf44845bd4a543840f94485b0
Author: shipmints <shipmi...@gmail.com>
Commit: shipmints <shipmi...@gmail.com>

    Rename internal references from sess to set
---
 bufferlo.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/bufferlo.el b/bufferlo.el
index e00a370d6b..a8df352085 100644
--- a/bufferlo.el
+++ b/bufferlo.el
@@ -722,13 +722,13 @@ string, FACE is the face for STR."
     (let* ((fbm (frame-parameter nil 'bufferlo-bookmark-frame-name))
            (tbm (alist-get 'bufferlo-bookmark-tab-name 
(tab-bar--current-tab-find (frame-parameter nil 'tabs))))
            (abm (or fbm tbm ""))
-           (sess-active (> (length bufferlo--active-sets) 0))
+           (set-active (> (length bufferlo--active-sets) 0))
            (maybe-space (if (display-graphic-p) "" " "))) ; tty rendering can 
be off for Ⓕ Ⓣ
       (concat
        (bufferlo--mode-line-format-helper abm bufferlo-mode-line-prefix 
'bufferlo-mode-line-face)
        (when bufferlo-mode-line-left-prefix
          (bufferlo--mode-line-format-helper abm bufferlo-mode-line-left-prefix 
'bufferlo-mode-line-face))
-       (when sess-active
+       (when set-active
          (bufferlo--mode-line-format-helper abm 
bufferlo-mode-line-set-active-prefix 'bufferlo-mode-line-set-face))
        (when fbm
          (bufferlo--mode-line-format-helper
@@ -2746,11 +2746,11 @@ throwing away the old one."
     (let* ((abms (bufferlo--active-bookmarks))
            (abm-names (mapcar #'car abms))
            (abm-names-to-save))
-      (dolist (sess-name comps)
+      (dolist (set-name comps)
         (setq abm-names-to-save
               (append abm-names-to-save
                       (seq-intersection
-                       (alist-get 'bufferlo-bookmark-names (assoc sess-name 
bufferlo--active-sets))
+                       (alist-get 'bufferlo-bookmark-names (assoc set-name 
bufferlo--active-sets))
                        abm-names))))
       (setq abm-names-to-save (seq-uniq abm-names-to-save))
       (bufferlo--bookmarks-save abm-names-to-save abms))))
@@ -2792,11 +2792,11 @@ This closes their associated bookmarks and kills their 
buffers."
     (let* ((abms (bufferlo--active-bookmarks))
            (abm-names (mapcar #'car abms))
            (abm-names-to-close))
-      (dolist (sess-name comps)
+      (dolist (set-name comps)
         (setq abm-names-to-close
               (append abm-names-to-close
                       (seq-intersection
-                       (alist-get 'bufferlo-bookmark-names (assoc sess-name 
bufferlo--active-sets))
+                       (alist-get 'bufferlo-bookmark-names (assoc set-name 
bufferlo--active-sets))
                        abm-names))))
       (setq abm-names-to-close (seq-uniq abm-names-to-close))
       (bufferlo--close-active-bookmarks abm-names-to-close abms)

Reply via email to