diff --git a/dotfiles/config/taffybar/stack.yaml b/dotfiles/config/taffybar/stack.yaml index fbb52a41..f94e0f3e 100644 --- a/dotfiles/config/taffybar/stack.yaml +++ b/dotfiles/config/taffybar/stack.yaml @@ -4,7 +4,7 @@ packages: - '.' - location: git: git@github.com:IvanMalison/taffybar.git - commit: 3a5024368b4783084302b61cb6eb0ba27e305693 + commit: e779acfe8056e6dde10638e2f7e4ec77f92b9448 extra-dep: true - location: git: git@github.com:willdonnelly/dyre.git diff --git a/dotfiles/config/taffybar/taffybar.hs b/dotfiles/config/taffybar/taffybar.hs index a4f666ef..29c3c43d 100644 --- a/dotfiles/config/taffybar/taffybar.hs +++ b/dotfiles/config/taffybar/taffybar.hs @@ -100,7 +100,7 @@ movableWidget builder = return moveWidget myFormatEntry wsNames ((ws, wtitle, wclass), _) = - printf "%s: %s - %s" wsName wtitle wclass + printf "%s: %s - %s" wsName (head $ splitOn "\NUL" wclass) wtitle where wsName = M.findWithDefault ("WS#" ++ show wsN) ws wsNames WSIdx wsN = ws diff --git a/dotfiles/emacs.d/README.org b/dotfiles/emacs.d/README.org index 4fc2b8bb..b07766c9 100644 --- a/dotfiles/emacs.d/README.org +++ b/dotfiles/emacs.d/README.org @@ -4178,7 +4178,6 @@ I had to disable this mode because something that it does messes with coding set ** recentf #+BEGIN_SRC emacs-lisp (use-package recentf - :defer 1 :config (progn (setq recentf-max-saved-items 1000 @@ -4939,7 +4938,3 @@ load-theme hook (See the heading below). (when (file-exists-p custom-after-file) (load custom-after-file)) (when (file-exists-p machine-custom) (load machine-custom)) #+END_SRC -* Finish Benchmarking -#+BEGIN_SRC emacs-lisp -(when imalison:do-benchmark (benchmark-init/deactivate)) -#+END_SRC diff --git a/dotfiles/emacs.d/init.el b/dotfiles/emacs.d/init.el index f229176e..8bd85aa5 100644 --- a/dotfiles/emacs.d/init.el +++ b/dotfiles/emacs.d/init.el @@ -72,6 +72,8 @@ (straight-transaction (concat (file-name-directory load-file-name) "README.org")))) +(when imalison:do-benchmark (benchmark-init/deactivate)) + ;; Local Variables: ;; flycheck-disabled-checkers: (emacs-lisp-checkdoc) ;; End: