Make the name buffer names a little better

This commit is contained in:
James Patrick 2021-04-02 15:53:52 -04:00
parent 1f7b9cd28e
commit 0ee113afd9
2 changed files with 18 additions and 0 deletions

17
emacs/+window.el Normal file
View File

@ -0,0 +1,17 @@
;;; window.org.el -*- lexical-binding: t; -*-
(setq doom-fallback-buffer-name "Doom"
+doom-dashboard-name "Doom Dashboard")
(setq frame-title-format
'(""
(:eval
(if (s-contains-p org-roam-directory (or buffer-file-name ""))
(replace-regexp-in-string
".*/[0-9]*-?" ""
(subst-char-in-string ?_ ? buffer-file-name))
"%b"))
(:eval
(let ((project-name (projectile-project-name)))
(unless (string= "-" project-name)
(format (if (buffer-modified-p) " ♢ %s" " ♦ %s") project-name))))))

View File

@ -23,3 +23,4 @@
(load! "+org")
(load! "+company")
(load! "+modeline")
(load! "+window")