summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBenjamin Lindqvist <benjamin.lindqvist@evidente.se>2018-01-29 13:25:07 +0100
committerBenjamin Lindqvist <benjamin.lindqvist@evidente.se>2018-01-29 13:25:07 +0100
commit00d891603b1d3c786a2f1e56000296c1573c4456 (patch)
tree5939932bddddde645fae5a472fa4515b219bf01c
parentda128c73b14ec6a220d1020f181b12c115c0df6d (diff)
Flicker removed by inserting straight into minibuffer, like minibuffer-line.el.
-rw-r--r--feebleline.el12
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."