|
|
@ -948,33 +948,36 @@ Functions that only use built-in Emacs functionality. |
|
|
|
Functions that use package functionality. |
|
|
|
Functions that use package functionality. |
|
|
|
|
|
|
|
|
|
|
|
#+BEGIN_SRC emacs-lisp |
|
|
|
#+BEGIN_SRC emacs-lisp |
|
|
|
(defun centaur-tabs-buffer-groups () |
|
|
|
(with-eval-after-load 'centaur-tabs |
|
|
|
"Organize tabs into groups by buffer." |
|
|
|
(defun centaur-tabs-buffer-groups () |
|
|
|
(list |
|
|
|
"Organize tabs into groups by buffer." |
|
|
|
(cond |
|
|
|
(list |
|
|
|
((string-equal "*" (substring (buffer-name) 0 1)) "Emacs") |
|
|
|
(cond |
|
|
|
((memq major-mode '(org-mode |
|
|
|
((string-equal "*" (substring (buffer-name) 0 1)) "Emacs") |
|
|
|
emacs-lisp-mode)) "Org Mode") |
|
|
|
((memq major-mode '(org-mode |
|
|
|
((derived-mode-p 'dired-mode) "Dired") |
|
|
|
emacs-lisp-mode)) "Org Mode") |
|
|
|
((derived-mode-p 'prog-mode |
|
|
|
((derived-mode-p 'dired-mode) "Dired") |
|
|
|
'text-mode) "Editing") |
|
|
|
((derived-mode-p 'prog-mode |
|
|
|
(t "User")))) |
|
|
|
'text-mode) "Editing") |
|
|
|
|
|
|
|
(t "User")))) |
|
|
|
(defun centaur-tabs-hide-tab (buffer) |
|
|
|
|
|
|
|
"Hide from the tab bar by BUFFER name." |
|
|
|
(defun centaur-tabs-hide-tab (buffer) |
|
|
|
(let ((name (format "%s" buffer))) |
|
|
|
"Hide from the tab bar by BUFFER name." |
|
|
|
(string-match-p |
|
|
|
(let ((name (format "%s" buffer))) |
|
|
|
(concat "^\\*\\(" |
|
|
|
(string-match-p |
|
|
|
"e?shell\\|" |
|
|
|
(concat "^\\*\\(" |
|
|
|
"Completions\\|" |
|
|
|
"e?shell\\|" |
|
|
|
"clangd\\|" ; lsp c/c++ |
|
|
|
"Completions\\|" |
|
|
|
"Faces\\|" |
|
|
|
"clangd\\|" ; lsp c/c++ |
|
|
|
"Help\\|" |
|
|
|
"Faces\\|" |
|
|
|
"helpful\\|" |
|
|
|
"Flycheck\\|" |
|
|
|
"iph\\|" ; lsp php |
|
|
|
"Help\\|" |
|
|
|
"Occur" |
|
|
|
"helpful\\|" |
|
|
|
"\\).*") |
|
|
|
"iph\\|" ; lsp php |
|
|
|
name))) |
|
|
|
"Occur" |
|
|
|
|
|
|
|
"\\).*") |
|
|
|
|
|
|
|
name))) |
|
|
|
|
|
|
|
) |
|
|
|
|
|
|
|
|
|
|
|
(defun dashboard-goto-bookmarks () |
|
|
|
(defun dashboard-goto-bookmarks () |
|
|
|
"Go to bookmarks." |
|
|
|
"Go to bookmarks." |
|
|
|