summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--init.el11
1 files changed, 10 insertions, 1 deletions
diff --git a/init.el b/init.el index ebbc6dd..1348bdc 100644 --- a/init.el +++ b/init.el
@@ -200,7 +200,16 @@
200 w32-pass-rwindow-to-system nil 200 w32-pass-rwindow-to-system nil
201 w32-rwindow-modifier 'super 201 w32-rwindow-modifier 'super
202 w32-pass-apps-to-system nil 202 w32-pass-apps-to-system nil
203 w32-apps-modifier 'hyper) 203 w32-apps-modifier 'hyper
204 visible-bell nil
205 ring-bell-function #'flash-mode-line)
206
207 (defun flash-mode-line ()
208 "Flash the modeline as a bell."
209 (when (eq acdw/system :home)
210 (beep))
211 (invert-face 'mode-line)
212 (run-with-timer 0.1 nil #'invert-face 'mode-line))
204 213
205 (when-unfocused garbage-collect 214 (when-unfocused garbage-collect
206 (garbage-collect)) 215 (garbage-collect))