# HG changeset patch
# User Markus Rost <rost@math.uni-bielefeld.de>
# Date 1037154399 0
# Node ID 8555178ad8a071d1addc48f8774335c5a62f9f62
# Parent  72cb4aac550e6e17c59e57645848d7e5b7ca1e56
(custom-handle-all-keywords): Fix arg passed to custom-add-to-group.

diff -r 72cb4aac550e -r 8555178ad8a0 lisp/custom.el
--- a/lisp/custom.el	Tue Nov 12 22:49:31 2002 +0000
+++ b/lisp/custom.el	Wed Nov 13 02:26:39 2002 +0000
@@ -396,7 +396,7 @@
   "For customization option SYMBOL, handle keyword arguments ARGS.
 Third argument TYPE is the custom option type."
   (unless (memq :group args)
-    (custom-add-to-group (custom-current-group) symbol 'custom-face))
+    (custom-add-to-group (custom-current-group) symbol type))
   (while args
     (let ((arg (car args)))
       (setq args (cdr args))