diff options
| author | Alan Pearce | 2015-06-11 17:37:41 +0200 |
|---|---|---|
| committer | Alan Pearce | 2015-06-11 17:37:41 +0200 |
| commit | 36c541555849f5c8d60824c929847e5ba6841a78 (patch) | |
| tree | 04a949dedcfda7fa519f362cf46186d5e429a3f3 /tag-emacs/emacs.d | |
| parent | e3a948891e3a30081a045f83cf7beb151075c1b5 (diff) | |
| download | dotfiles-36c541555849f5c8d60824c929847e5ba6841a78.tar.lz dotfiles-36c541555849f5c8d60824c929847e5ba6841a78.tar.zst dotfiles-36c541555849f5c8d60824c929847e5ba6841a78.zip | |
Emacs: Update frame-title-format
Diffstat (limited to 'tag-emacs/emacs.d')
| -rw-r--r-- | tag-emacs/emacs.d/init.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tag-emacs/emacs.d/init.el b/tag-emacs/emacs.d/init.el index f097b27..7d16a8c 100644 --- a/tag-emacs/emacs.d/init.el +++ b/tag-emacs/emacs.d/init.el @@ -1541,13 +1541,13 @@ symbol, not word, as I need this for programming the most." ;;;; Windows & Frames (setq frame-title-format - '((:eval (capitalize invocation-name)) ": " - (:eval (if (and (fboundp #'project-project-p) + '((:eval (if (and (fboundp #'projectile-project-p) (projectile-project-p)) - (projectile-project-name) - (if (buffer-file-name) - (abbreviate-file-name (buffer-file-name)) - "%b"))))) + (projectile-project-name))) + ": " + (:eval (if (buffer-file-name) + (buffer-name) + "%b")))) (setq scroll-conservatively 100 ; Keep the cursor position when scrolling scroll-margin 1 |