summaryrefslogtreecommitdiffstats
path: root/emacs.d
diff options
context:
space:
mode:
authorDavid Robillard <d@drobilla.net>2017-12-10 12:57:52 +0100
committerDavid Robillard <d@drobilla.net>2017-12-10 12:57:52 +0100
commit0bd552a47faafa17a55f56f152dbe09ab2283c2c (patch)
treebb5d49e0cc6bdcde8f2020c85bf6373b8f9b1d63 /emacs.d
parent158e32931c69e8c97cd0d269179541c113ced290 (diff)
downloaddotfiles-0bd552a47faafa17a55f56f152dbe09ab2283c2c.tar.gz
dotfiles-0bd552a47faafa17a55f56f152dbe09ab2283c2c.tar.bz2
dotfiles-0bd552a47faafa17a55f56f152dbe09ab2283c2c.zip
Fix visible bell
Diffstat (limited to 'emacs.d')
-rw-r--r--emacs.d/init.el6
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