From: Daniel Colascione <dancol@dancol.org>
Date: Fri, 16 Jan 2015 04:51:48 +0000 (-0800)
Subject: Make `ring-bell-function' customizable.
X-Git-Tag: emacs-25.0.90~2599^2~7
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0ecb1eb988d25d3511e11ac39e05550cec57dc3f;p=emacs.git

Make `ring-bell-function' customizable.

* lisp/cus-start.el (all): Make `ring-bell-function' customizable.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 908c02788cf..fbfd68e8730 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2015-01-16  Daniel Colascione  <dancol@dancol.org>
+
+	* cus-start.el (all): Make `ring-bell-function' customizable.
+
 2015-01-16  Dmitry Gutov  <dgutov@yandex.ru>
 
 	* vc/vc-svn.el (vc-svn-dir-status-files): Pass t as
diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index 299b18d0118..71506cb680e 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -421,6 +421,12 @@ Leaving \"Default\" unchecked is equivalent with specifying a default of
 						    "21.1")
              ;; term.c
              (visible-cursor cursor boolean "22.1")
+             ;; terminal.c
+             (ring-bell-function display
+              (choice
+               (const :tag "Default" nil)
+               (const :tag "Silent" ignore)
+               function))
 	     ;; undo.c
 	     (undo-limit undo integer)
 	     (undo-strong-limit undo integer)