Skip to content

Commit

Permalink
style: Fix lint errors
Browse files Browse the repository at this point in the history
  • Loading branch information
jcs090218 committed Jun 29, 2024
1 parent a4dfb02 commit 6cf94cb
Showing 1 changed file with 5 additions and 7 deletions.
12 changes: 5 additions & 7 deletions centaur-tabs-interactive.el
Original file line number Diff line number Diff line change
Expand Up @@ -82,11 +82,10 @@
(groups (centaur-tabs-get-groups))
(group-name (or groupname (centaur-tabs-completing-read "Groups: " groups))) )
(catch 'done
(mapc
#'(lambda (group)
(when (equal group-name (car (car (cdr (cdr group)))))
(throw 'done (switch-to-buffer (car (cdr group))))))
tab-buffer-list) )))
(mapc #'(lambda (group)
(when (equal group-name (car (car (cdr (cdr group)))))
(throw 'done (switch-to-buffer (car (cdr group))))))
tab-buffer-list) )))

(defun centaur-tabs-select-end-tab ()
"Select end tab of current tabset."
Expand Down Expand Up @@ -188,8 +187,7 @@ move forward."
(with-current-buffer buffer
(when (string-equal current-group-name (cdr (centaur-tabs-selected-tab (centaur-tabs-current-tabset t))))
(when (funcall ,match-rule buffer)
(kill-buffer buffer))
)))
(kill-buffer buffer)))))
(buffer-list))))

(defun centaur-tabs-kill-all-buffers-in-current-group ()
Expand Down

0 comments on commit 6cf94cb

Please sign in to comment.