diff options
| author | mms <michal@sapka.me> | 2024-07-09 23:24:54 +0200 |
|---|---|---|
| committer | mms <michal@sapka.me> | 2024-07-09 23:24:54 +0200 |
| commit | 2e93133943d295f8dfad863c5bdedc8d7eb5f9d8 (patch) | |
| tree | 11e4993398f28fe209d7611f97c206fbe1b04fef | |
| parent | c889dc7f70c36f976d112875cf1dd2a3794429ce (diff) | |
fix: proper audio fix
flash modeline color
| -rw-r--r-- | mms-configuration.org | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/mms-configuration.org b/mms-configuration.org index 57b93ba..4ff72fb 100644 --- a/mms-configuration.org +++ b/mms-configuration.org @@ -73,7 +73,13 @@ Let's use spaces everywhere Stop Emacs from using =audible bell= #+begin_src emacs-lisp -(setq visible-bell t) + (setq ring-bell-function + (lambda () + (let ((orig-fg (face-foreground 'mode-line))) + (set-face-foreground 'mode-line "#F2804F") + (run-with-idle-timer 0.1 nil + (lambda (fg) (set-face-foreground 'mode-line fg)) + orig-fg)))) #+end_src * Package management |