Make `ring-bell-function' customizable.

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

2 files changed, 10 insertions, 0 deletions

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)