From 9b6098b97d9d4b29ada0f4495d3ed6f79acff078 Mon Sep 17 00:00:00 2001 From: Markus Rost Date: Wed, 13 Nov 2002 02:27:21 +0000 Subject: [PATCH] (custom-handle-all-keywords): Fix arg passed to custom-add-to-group. --- lisp/ChangeLog | 5 +++++ lisp/custom.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6c4c68b73c8..dde7ded30cd 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2002-11-13 Markus Rost + + * custom.el (custom-handle-all-keywords): Fix arg passed to + custom-add-to-group. + 2002-11-12 Markus Rost * vc-rcs.el (vc-rcs-registered): Handle the autoload cookie so diff --git a/lisp/custom.el b/lisp/custom.el index 0d0728d5462..dcc6bb6f046 100644 --- a/lisp/custom.el +++ b/lisp/custom.el @@ -396,7 +396,7 @@ If no such group is found, return nil." "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)) -- 2.39.2