diff options
author | Thierry Volpiatto <thievol@posteo.net> | 2020-09-03 09:15:35 +0200 |
---|---|---|
committer | Thierry Volpiatto <thievol@posteo.net> | 2020-09-03 09:15:35 +0200 |
commit | 2eff59c741ea23e773e0e0e9f581432abcae72c9 (patch) | |
tree | 7b71bd7ed29bc84239311cfba53a50a10d55b283 /helm-types.el | |
parent | 4989a7e902b7907259a41d1e91f8143c52065214 (diff) |
Ensure to use the mode-line default-value at startup (#1517,#2377)
Use default-value of `helm-mode-line-string' in case user
starts with a helm buffer as current-buffer otherwise the
local value of this helm buffer is used.
Diffstat (limited to 'helm-types.el')
-rw-r--r-- | helm-types.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/helm-types.el b/helm-types.el index 134c30bd..6cdacf59 100644 --- a/helm-types.el +++ b/helm-types.el @@ -211,7 +211,11 @@ (defmethod helm--setup-source :before ((source helm-type-buffer)) (setf (slot-value source 'action) 'helm-type-buffer-actions) (setf (slot-value source 'persistent-help) "Show this buffer") - (setf (slot-value source 'mode-line) (list "Buffer(s)" helm-mode-line-string)) + (setf (slot-value source 'mode-line) + ;; Use default-value of `helm-mode-line-string' in case user + ;; starts with a helm buffer as current-buffer otherwise the + ;; local value of this helm buffer is used (issues #1517,#2377). + (list "Buffer(s)" (default-value 'helm-mode-line-string))) (setf (slot-value source 'filtered-candidate-transformer) '(helm-skip-boring-buffers helm-buffers-sort-transformer |