diff options
author | David Robillard <d@drobilla.net> | 2017-12-10 12:57:52 +0100 |
---|---|---|
committer | David Robillard <d@drobilla.net> | 2017-12-10 12:57:52 +0100 |
commit | 0bd552a47faafa17a55f56f152dbe09ab2283c2c (patch) | |
tree | bb5d49e0cc6bdcde8f2020c85bf6373b8f9b1d63 /emacs.d | |
parent | 158e32931c69e8c97cd0d269179541c113ced290 (diff) | |
download | dotfiles-0bd552a47faafa17a55f56f152dbe09ab2283c2c.tar.gz dotfiles-0bd552a47faafa17a55f56f152dbe09ab2283c2c.tar.bz2 dotfiles-0bd552a47faafa17a55f56f152dbe09ab2283c2c.zip |
Fix visible bell
Diffstat (limited to 'emacs.d')
-rw-r--r-- | emacs.d/init.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/emacs.d/init.el b/emacs.d/init.el index 5043e92..5aaacb8 100644 --- a/emacs.d/init.el +++ b/emacs.d/init.el @@ -219,9 +219,11 @@ (setq ring-bell-function (lambda () - (lexical-let ((fg (face-foreground 'mode-line))) + (let ((orig-fg (face-foreground 'mode-line))) (set-face-foreground 'mode-line "#F2804F") - (run-with-idle-timer 0.1 nil (lambda () (set-face-foreground 'mode-line fg)))))) + (run-with-idle-timer 0.1 nil + (lambda (fg) (set-face-foreground 'mode-line fg)) + orig-fg)))) ;;; Colours |