Ver código fonte

Add minibuffer-line idle timer

master
10sr 6 anos atrás
pai
commit
b9fd4258c5
Acessado por: 10sr ID da chave GPG: 7BEC428194130EB2
1 arquivos alterados com 16 adições e 0 exclusões
  1. +16
    -0
      emacs.el

+ 16
- 0
emacs.el Ver arquivo

@@ -456,6 +456,22 @@ found, otherwise returns nil."
(set-face-underline 'minibuffer-line nil)
(set-variable 'minibuffer-line-refresh-interval
25)

;; Set idle timer
(defvar my-minibuffer-line--idle-timer nil)
(defvar minibuffer-line-mode)
(add-hook 'minibuffer-line-mode-hook
(lambda ()
(when my-minibuffer-line--idle-timer
(cancel-timer my-minibuffer-line--idle-timer)
(setq my-minibuffer-line--idle-timer nil))
(when minibuffer-line-mode
(setq my-minibuffer-line--idle-timer
(run-with-idle-timer 0.5
t
'minibuffer-line--update)))))


(set-variable 'minibuffer-line-format
`(,(concat user-login-name
"@"


Carregando…
Cancelar
Salvar