Mercurial > emacs
comparison lisp/gnus/earcon.el @ 38876:1daef9a5589e
(earcon-auto-play): Remove unused option.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Mon, 20 Aug 2001 10:32:38 +0000 |
parents | a26d9b55abb6 |
children | 695cf19ef79e d7ddb3e565de |
comparison
equal
deleted
inserted
replaced
38875:6710276b9747 | 38876:1daef9a5589e |
---|---|
1 ;;; earcon.el --- sound effects for messages | 1 ;;; earcon.el --- sound effects for messages |
2 | 2 |
3 ;; Copyright (C) 1996, 2000 Free Software Foundation | 3 ;; Copyright (C) 1996, 2000, 2001 Free Software Foundation |
4 | 4 |
5 ;; Author: Steven L. Baur <steve@miranova.com> | 5 ;; Author: Steven L. Baur <steve@miranova.com> |
6 | 6 |
7 ;; This file is part of GNU Emacs. | 7 ;; This file is part of GNU Emacs. |
8 | 8 |
34 (require 'gnus-art) | 34 (require 'gnus-art) |
35 | 35 |
36 (defgroup earcon nil | 36 (defgroup earcon nil |
37 "Turn ** sounds ** into noise." | 37 "Turn ** sounds ** into noise." |
38 :group 'gnus-visual) | 38 :group 'gnus-visual) |
39 | |
40 (defcustom earcon-auto-play nil | |
41 "*When True, automatically play sounds as well as buttonize them." | |
42 :type 'boolean | |
43 :group 'earcon) | |
44 | 39 |
45 (defcustom earcon-prefix "**" | 40 (defcustom earcon-prefix "**" |
46 "*String denoting the start of an earcon." | 41 "*String denoting the start of an earcon." |
47 :type 'string | 42 :type 'string |
48 :group 'earcon) | 43 :group 'earcon) |