From d8002787cc9d6862b5c3700a60e1f5181d775208 Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Wed, 4 Jun 2014 16:42:02 +0100
Subject: Emacs: ring the bell a bit less often

---
 tag-emacs/emacs.d/init.el | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'tag-emacs')

diff --git a/tag-emacs/emacs.d/init.el b/tag-emacs/emacs.d/init.el
index cd798bf..b4b5a92 100644
--- a/tag-emacs/emacs.d/init.el
+++ b/tag-emacs/emacs.d/init.el
@@ -79,6 +79,12 @@
 (when (fboundp #'blink-cursor-mode)
   (blink-cursor-mode -1))
 
+(setq ring-bell-function
+      (lambda ()
+        (unless (memq this-command
+                      '(isearch-abort abort-recursive-edit exit-minibuffer keyboard-quit undo-tree-undo))
+          (ding))))
+
 (req-package solarized-theme
   :config (load-theme 'solarized-light t))
 
-- 
cgit 1.4.1