# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 966347077 0
# Node ID 2ae4e53657a3873d2896f85c40c0247560702540
# Parent  6c6b0162bae2c8f6cee1aa03524617fc3c2b9b75
(cwarn) <defgroup>: Add :version, :link.
(global-cwarn-mode): Don't make it a user option.  Unquote lambda.
(cwarn-font-lock-feature-keywords-alist): Don't make it a user
option.  Provide :type.
(cwarn-configuration): Provide :type.
(cwarn-mode): Doc fix.

diff -r 6c6b0162bae2 -r 2ae4e53657a3 lisp/progmodes/cwarn.el
--- a/lisp/progmodes/cwarn.el	Tue Aug 15 13:29:02 2000 +0000
+++ b/lisp/progmodes/cwarn.el	Tue Aug 15 13:44:37 2000 +0000
@@ -118,6 +118,8 @@
 
 (defgroup cwarn nil
   "Highlight suspicious C and C++ constructions."
+  :version "21.1"
+  :link '(url-link "http://www.andersl.com/emacs")
   :group 'faces)
 
 (defvar cwarn-mode nil
@@ -127,14 +129,14 @@
 instead.")
 
 (defcustom global-cwarn-mode nil
-  "*When on, suspicious C and C++ constructions are highlighted.
+  "When on, suspicious C and C++ constructions are highlighted.
 
 Set this variable using \\[customize] or use the command
 `global-cwarn-mode'."
   :group 'cwarn
   :initialize 'custom-initialize-default
-  :set '(lambda (symbol value)
-	  (global-cwarn-mode (or value 0)))
+  :set (lambda (symbol value)
+	 (global-cwarn-mode (or value 0)))
   :type 'boolean
   :require 'cwarn)
 
@@ -152,16 +154,21 @@
 
 See variable `cwarn-font-lock-feature-keywords-alist' for available
 features."
+  :type '(repeat sexp)
   :group 'cwarn)
 
 (defcustom cwarn-font-lock-feature-keywords-alist
   '((assign    . cwarn-font-lock-assignment-keywords)
     (semicolon . cwarn-font-lock-semicolon-keywords)
     (reference . cwarn-font-lock-reference-keywords))
-  "*Maps a CWarn feature to font-lock keywords.
+  "An alist mapping a CWarn feature to font-lock keywords.
 The keywords could either a font-lock keyword list or a symbol.
 If it is a symbol it is assumed to be a variable containing a font-lock
 keyword list."
+  :type '(alist :key-type (choice (const assign)
+				  (const semicolon)
+				  (const reference))
+		:value-type face)
   :group 'cwarn)
 
 (defcustom cwarn-verbose t
@@ -211,7 +218,7 @@
 
 ;;;###autoload
 (defun cwarn-mode (&optional arg)
-  "Minor mode that hightlight suspicious C and C++ constructions.
+  "Minor mode that highlights suspicious C and C++ constructions.
 
 Note, in addition to enabling this minor mode, the major mode must
 be included in the variable `cwarn-configuration'.  By default C and