doom_bankruptcy #14
17
emacs/+window.el
Normal file
17
emacs/+window.el
Normal 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))))))
|
|
@ -23,3 +23,4 @@
|
||||||
(load! "+org")
|
(load! "+org")
|
||||||
(load! "+company")
|
(load! "+company")
|
||||||
(load! "+modeline")
|
(load! "+modeline")
|
||||||
|
(load! "+window")
|
||||||
|
|
Loading…
Reference in New Issue
Block a user