2025-12-20 15:13:13 +11:00
|
|
|
;; -*- lexical-binding: t; -*-
|
|
|
|
|
|
2025-12-21 12:57:53 +11:00
|
|
|
|
2026-02-05 21:48:27 +11:00
|
|
|
(use-package project)
|
2026-01-30 03:52:15 +11:00
|
|
|
|
2026-02-22 04:13:33 +11:00
|
|
|
(use-package tab-bar
|
|
|
|
|
:ensure nil
|
|
|
|
|
:init
|
|
|
|
|
(tab-bar-mode t)
|
|
|
|
|
(setq tab-bar-new-tab-choice "*scratch*") ;; buffer to show in new tabs
|
|
|
|
|
(setq tab-bar-close-button-show nil) ;; hide tab close / X button
|
|
|
|
|
(setq tab-bar-show 1) ;; hide bar if <= 1 tabs open
|
|
|
|
|
(setq tab-bar-format '(tab-bar-format-tabs tab-bar-separator))
|
|
|
|
|
|
|
|
|
|
(setq tab-bar-tab-hints t))
|
|
|
|
|
|
2026-02-05 21:48:27 +11:00
|
|
|
(use-package tabspaces
|
|
|
|
|
:functions tabspaces-mode
|
2026-02-08 20:12:13 +11:00
|
|
|
:commands (tabspaces-switch-or-create-workspace
|
|
|
|
|
tabspaces-open-or-create-project-and-workspace)
|
2026-02-05 21:48:27 +11:00
|
|
|
:hook (elpaca-after-init . tabspaces-mode)
|
2026-02-08 20:12:13 +11:00
|
|
|
:bind (:map tabspaces-mode-map
|
2026-02-22 04:13:33 +11:00
|
|
|
([remap project-switch-project] . tabspaces-project-switch-project-open-file))
|
|
|
|
|
:bind (:map tabspaces-command-map
|
|
|
|
|
("l" . tabspaces-restore-session)
|
|
|
|
|
("s" . tabspaces-save-session)
|
|
|
|
|
("TAB" . tabspaces-switch-or-create-workspace))
|
2025-12-20 15:13:13 +11:00
|
|
|
|
2026-02-22 04:13:33 +11:00
|
|
|
:custom
|
2026-02-05 21:48:27 +11:00
|
|
|
(tabspaces-use-filtered-buffers-as-default t)
|
|
|
|
|
(tabspaces-default-tab "Default")
|
|
|
|
|
(tabspaces-remove-to-default t)
|
|
|
|
|
(tabspaces-include-buffers '("*scratch*" "*Messages*"))
|
|
|
|
|
(tabspaces-exclude-buffers '("*eat*" "*vterm*" "*shell*" "*eshell*"))
|
|
|
|
|
;; sessions
|
|
|
|
|
(tabspaces-session t)
|
2026-02-08 23:44:31 +11:00
|
|
|
;; (tabspaces-session-auto-restore t)
|
2026-02-22 04:13:33 +11:00
|
|
|
(tabspaces-keymap-prefix "C-c TAB")
|
|
|
|
|
(tab-bar-new-tab-choice "default")
|
|
|
|
|
|
|
|
|
|
(with-eval-after-load 'consult
|
|
|
|
|
;; hide full buffer list (still available with "b" prefix)
|
|
|
|
|
(consult-customize consult--source-buffer :hidden nil :default nil)
|
|
|
|
|
;; set consult-workspace buffer list
|
|
|
|
|
(defvar consult--source-workspace
|
|
|
|
|
(list :name "Workspace Buffers"
|
|
|
|
|
:narrow ?w
|
|
|
|
|
:history 'buffer-name-history
|
|
|
|
|
:category 'buffer
|
|
|
|
|
:state #'consult--buffer-state
|
|
|
|
|
:default t
|
|
|
|
|
:items (lambda () (consult--buffer-query
|
|
|
|
|
:predicate #'tabspaces--local-buffer-p
|
|
|
|
|
:sort 'visibility
|
|
|
|
|
:as #'buffer-name)))
|
|
|
|
|
|
|
|
|
|
"Set workspace buffer list for consult-buffer.")
|
|
|
|
|
(add-to-list 'consult-buffer-sources 'consult--source-workspace)))
|
2026-02-08 20:12:13 +11:00
|
|
|
|
2025-12-20 15:13:13 +11:00
|
|
|
(provide 'init-workspace)
|
