summaryrefslogtreecommitdiff
path: root/.config/emacs/modules/bd--tabs.el
diff options
context:
space:
mode:
authorbd <bdunahu@operationnull.com>2025-12-13 23:43:10 -0500
committerbdunahu <bdunahu@operationnull.com>2026-01-03 21:46:06 -0700
commit288ccb3984c7cb46b67d0f6bf7fb6d53c5d7a2d3 (patch)
tree47091f5aeede90e1364546e8122cd55e6d7f2971 /.config/emacs/modules/bd--tabs.el
parentdf14036eb22ff9326c2806eb3f8cafc0d3042efa (diff)
guix: full refactor of configuration structure
Diffstat (limited to '.config/emacs/modules/bd--tabs.el')
-rw-r--r--.config/emacs/modules/bd--tabs.el43
1 files changed, 0 insertions, 43 deletions
diff --git a/.config/emacs/modules/bd--tabs.el b/.config/emacs/modules/bd--tabs.el
deleted file mode 100644
index 6d4f12f..0000000
--- a/.config/emacs/modules/bd--tabs.el
+++ /dev/null
@@ -1,43 +0,0 @@
-;;; -*- lexical-binding: t; -*-
-;;; Commentary:
-;;; Code:
-
-
-(use-package tab-bar
- :demand t
- :config
- (defun bd/get-mode-line-modes (buffer)
- (with-current-buffer buffer
- (format-mode-line (remove '(t erc-modified-channels-object) mode-line-modes))))
- (defun bd/tab-bar-name-function ()
- (concat (tab-bar-tab-name-current)
- " "
- (bd/get-mode-line-modes (window-buffer (minibuffer-selected-window)))))
- (defun bd/toggle-tab-bar ()
- (interactive)
- (setopt tab-bar-show (not tab-bar-show))
- ;; required to wait for the frame to update
- (sit-for 0)
- ;; dumb outer-gaps bug
- (exwm-outer-gaps-apply))
-
- (tab-bar-select-tab 1)
- (tab-bar-mode)
- (tab-bar-history-mode)
- (setopt tab-bar-tab-name-function #'bd/tab-bar-name-function
- tab-bar-show t
-
- tab-bar-select-restore-windows nil
-
- ;; remove useless gui elements
- tab-bar-format
- '(tab-bar-format-tabs)
- tab-bar-close-button-show nil
- tab-bar-auto-width-max nil
-
- ;; add useless text elements
- tab-bar-tab-hints nil))
-
-
-(provide 'bd--tabs)
-;;; bd--tabs.el ends here