X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fearcon.el;h=4302182733ca3840e30772bcd79ee9c263f0a703;hb=c5a1ec5514a2c218c037d83b81da9043e9f6c321;hp=ee2b041e154350c8124352952ea15f09b71ad267;hpb=4c2e20a67169654caf07221554d9e637d3f7bbfa;p=elisp%2Fgnus.git-

diff --git a/lisp/earcon.el b/lisp/earcon.el
index ee2b041..4302182 100644
--- a/lisp/earcon.el
+++ b/lisp/earcon.el
@@ -2,10 +2,6 @@
 ;; Copyright (C) 1996 Free Software Foundation
 
 ;; Author: Steven L. Baur <steve@miranova.com>
-;; Keywords: news fun sound
-
-;; This file is part of GNU Emacs.
-
 ;; GNU Emacs is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
 ;; the Free Software Foundation; either version 2, or (at your option)
@@ -39,12 +35,12 @@
   :group 'gnus-visual)
 
 (defcustom earcon-auto-play nil
-  "When True, automatically play sounds as well as buttonize them."
+  "*When True, automatically play sounds as well as buttonize them."
   :type 'boolean
   :group 'earcon)
 
 (defcustom earcon-prefix "**"
-  "String denoting the start of an earcon."
+  "*String denoting the start of an earcon."
   :type 'string
   :group 'earcon)
 
@@ -70,12 +66,11 @@
     ("cackle" 1 "witch.au")
     ("yell\\|roar" 1 "yell2.au")
     ("whoop-de-doo" 1 "whistle.au"))
-  "A list of regexps to map earcons to real sounds."
+  "*A list of regexps to map earcons to real sounds."
   :type '(repeat (list regexp
 		       (integer :tag "Match")
 		       (string :tag "Sound")))
   :group 'earcon)
-
 (defvar earcon-button-marker-list nil)
 (make-variable-buffer-local 'earcon-button-marker-list)