about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2021-05-28 20:50:58 -0500
committerCase Duckworth2021-05-28 20:50:58 -0500
commitdb1eb2d7b412ec65d82f38dcb8f62606cc222927 (patch)
tree4fc8ef8b9f958c5be37ed1654878517d80ffa440
parentChange flyspell-start behavior (diff)
downloademacs-db1eb2d7b412ec65d82f38dcb8f62606cc222927.tar.gz
emacs-db1eb2d7b412ec65d82f38dcb8f62606cc222927.zip
Change frame-title-format
-rw-r--r--init.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/init.el b/init.el index 359c188..82632fe 100644 --- a/init.el +++ b/init.el
@@ -408,12 +408,12 @@
408 (define-key flyspell-mode-map (kbd "C-;") #'flyspell-correct-wrapper)))) 408 (define-key flyspell-mode-map (kbd "C-;") #'flyspell-correct-wrapper))))
409 409
410(setup frames 410(setup frames
411 (:option frame-title-format '((:eval (if-let ((bn buffer-file-name)) 411 (:option frame-title-format '("%b@"
412 (abbreviate-file-name bn) 412 (:eval
413 "%b")) 413 (or (file-remote-p default-directory 'host)
414 system-name))
414 " %+%* GNU Emacs" 415 " %+%* GNU Emacs"
415 (:eval (when (frame-parameter 416 (:eval (when (frame-parameter nil 'client)
416 nil 'client)
417 " Client"))) 417 " Client")))
418 window-resize-pixelwise t) 418 window-resize-pixelwise t)
419 419