diff options
| author | Case Duckworth | 2021-05-28 20:50:58 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-05-28 20:50:58 -0500 |
| commit | db1eb2d7b412ec65d82f38dcb8f62606cc222927 (patch) | |
| tree | 4fc8ef8b9f958c5be37ed1654878517d80ffa440 | |
| parent | Change flyspell-start behavior (diff) | |
| download | emacs-db1eb2d7b412ec65d82f38dcb8f62606cc222927.tar.gz emacs-db1eb2d7b412ec65d82f38dcb8f62606cc222927.zip | |
Change frame-title-format
| -rw-r--r-- | init.el | 10 |
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 | ||