From 3547daff1cbd5adc08757c472f2fd5b38fccfc9a Mon Sep 17 00:00:00 2001 From: bd Date: Mon, 22 Jul 2024 19:53:47 -0600 Subject: Remove quiet from kernel arguments --- .config/emacs/modules/bd--tabs.el | 21 +-------------------- .config/guix/modules/ymir.scm | 4 ++-- 2 files changed, 3 insertions(+), 22 deletions(-) (limited to '.config') diff --git a/.config/emacs/modules/bd--tabs.el b/.config/emacs/modules/bd--tabs.el index e1c6fd2..3ef18d8 100644 --- a/.config/emacs/modules/bd--tabs.el +++ b/.config/emacs/modules/bd--tabs.el @@ -11,7 +11,7 @@ (defun bd/get-mode-line-modes (buffer) (with-current-buffer buffer - (format-mode-line (cdr mode-line-modes)))) + (format-mode-line (remove '(t erc-modified-channels-object) mode-line-modes)))) ;;;; turn tabs on, undo/redo mode (setq tab-bar-show t) @@ -35,25 +35,6 @@ (setopt tab-bar-tab-hints nil tab-bar-select-tab-modifiers '(meta)) - -;; use project name if it exists -(defun bd/tab-bar-name-function () - (mapconcat (lambda (buffer) - (let* ((file (buffer-file-name buffer)) - (project (and file (project-current - nil - (file-name-directory (buffer-file-name buffer)))))) - (if project - (car (last - (file-name-split - (directory-file-name - (project-root project))))) - (tab-bar-tab-name-current)))) - (delete-dups (mapcar #'window-buffer - (window-list-1 (frame-first-window) - 'nomini))) - ", ")) - (defun bd/tab-bar-name-function () (concat (tab-bar-tab-name-current) " " diff --git a/.config/guix/modules/ymir.scm b/.config/guix/modules/ymir.scm index cc1c856..ace200f 100644 --- a/.config/guix/modules/ymir.scm +++ b/.config/guix/modules/ymir.scm @@ -31,8 +31,8 @@ (timezone "America/Denver") (keyboard-layout (keyboard-layout "us")) (kernel-arguments - (list - "quiet")) + (delete "quiet" + %default-kernel-arguments)) ;; 'root' is implicit (users (cons* user -- cgit v1.2.3