From 3ac8f339b40dd4125e851729af065801828771a6 Mon Sep 17 00:00:00 2001 From: David Robillard Date: Sat, 9 Dec 2017 12:50:08 +0100 Subject: Use less intrusive visible bell --- emacs.d/init.el | 13 ++++++++++--- 1 file changed, 10 insertions(+), 3 deletions(-) diff --git a/emacs.d/init.el b/emacs.d/init.el index 9691ca1..60ac5d5 100644 --- a/emacs.d/init.el +++ b/emacs.d/init.el @@ -116,7 +116,7 @@ '(custom-enabled-themes (quote (drobillized))) '(custom-safe-themes (quote - ("498d05dd285960bd58847dec6e3035978dd8657786ac519bea9c6498112251b3" default))) + ("0c7a876ee4604508caaa687b51e65df7faed748b1ef279db5ee311781691eaf8" default))) '(delete-old-versions t) '(dired-omit-files "^\\.?#\\|^\\.$\\|^\\.\\.\\|^\\..*$") '(diredp-hide-details-initially-flag t) @@ -196,7 +196,7 @@ (quote (auctex clang-format counsel-gtags counsel-projectile dired+ dired-rainbow flyspell-correct-ivy ggtags glsl-mode ivy magit markdown-mode n3-mode pdf-tools projectile spaceline swift-mode use-package))) '(pdf-view-midnight-colors (quote ("#C3D1D1" . "#141414"))) - '(powerline-default-separator nil) + '(powerline-default-separator (quote arrow)) '(projectile-completion-system (quote ivy)) '(projectile-enable-caching t) '(projectile-mode-line nil) @@ -211,7 +211,14 @@ '(speedbar-use-images nil) '(split-window-preferred-function (quote split-window-horizontally)) '(tool-bar-mode nil) - '(version-control t)) + '(version-control t) + '(visible-bell nil)) + +(setq ring-bell-function + (lambda () + (lexical-let ((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)))))) ;;; Colours -- cgit v1.2.1