diff options
| author | Benjamin Lindqvist <benjamin.lindqvist@evidente.se> | 2018-01-29 13:25:07 +0100 |
|---|---|---|
| committer | Benjamin Lindqvist <benjamin.lindqvist@evidente.se> | 2018-01-29 13:25:07 +0100 |
| commit | 00d891603b1d3c786a2f1e56000296c1573c4456 (patch) | |
| tree | 5939932bddddde645fae5a472fa4515b219bf01c | |
| parent | da128c73b14ec6a220d1020f181b12c115c0df6d (diff) | |
Flicker removed by inserting straight into minibuffer, like minibuffer-line.el.
| -rw-r--r-- | feebleline.el | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/feebleline.el b/feebleline.el index b3ed860..4002754 100644 --- a/feebleline.el +++ b/feebleline.el @@ -106,7 +106,7 @@ sent to `add-text-properties'.") (if feebleline-mode (progn (setq feebleline/mode-line-format-default mode-line-format) - (setq feebleline/timer (run-with-timer 0 0.1 'feebleline-mode-line-proxy-fn)) + (setq feebleline/timer (run-with-timer 0 1 'feebleline-mode-line-proxy-fn)) (custom-set-variables '(mode-line-format nil)) (ad-activate 'handle-switch-frame) (add-hook 'focus-in-hook 'feebleline-mode-line-proxy-fn)) @@ -125,11 +125,17 @@ sent to `add-text-properties'.") (add-text-properties 0 (length text) props text)) text)) +(defvar feebleline-placeholder) (defun feebleline-message-buffer-file-name-or-nothing () "Replace echo-area message with mode-line proxy." (when buffer-file-name - (let ((message-log-max nil)) - (message (mapconcat #'feebleline--mode-line-part feebleline-mode-line-text ""))))) + (setq feebleline-placeholder + (mapconcat #'feebleline--mode-line-part feebleline-mode-line-text "")) + (with-current-buffer " *Minibuf-0*" + (erase-buffer) + (insert feebleline-placeholder) + ) + )) (defun feebleline-mode-line-proxy-fn () "Put a mode-line proxy in the echo area *if* echo area is empty." |
