From 0cdb73667049a2384efb110adba60b690d6832fd Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Wed, 1 Aug 2018 01:47:32 +0200 Subject: [PATCH] Default modeline segments to :init Fixes buffer-id in non-file-visiting buffers. --- modules/ui/modeline/autoload/settings.el | 2 +- modules/ui/modeline/config.el | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/modules/ui/modeline/autoload/settings.el b/modules/ui/modeline/autoload/settings.el index f4891edba..3e0441aae 100644 --- a/modules/ui/modeline/autoload/settings.el +++ b/modules/ui/modeline/autoload/settings.el @@ -79,7 +79,7 @@ keep them left and right aligned respectively." (if (eq realvar name) `((defvar-local ,name nil ,docstring) (setq-default ,name ,init)) - `((defvar-local ,realvar nil) + `((defvar-local ,realvar ,init) (defvar-local ,name nil ,docstring) (setq-default ,name '(:eval (cond ((active) ,realvar) diff --git a/modules/ui/modeline/config.el b/modules/ui/modeline/config.el index 7ad96885e..984e620c4 100644 --- a/modules/ui/modeline/config.el +++ b/modules/ui/modeline/config.el @@ -291,6 +291,7 @@ buffers.") (def-modeline-segment! +modeline-buffer-id :on-hooks (find-file-hook after-save-hook after-revert-hook) + :init "%b" :faces t (if buffer-file-name (funcall +modeline-buffer-path-function buffer-file-name)