From 6ccf3dfde882ca96905510f105a0294792fa1214 Mon Sep 17 00:00:00 2001 From: hmurata Date: Sun, 22 Jan 2006 13:33:04 +0000 Subject: [PATCH] * elmo-vars.el (elmo-mailing-list-name-spec-list): Fixed customization type. (elmo-mailing-list-count-spec-list): Ditto. --- elmo/ChangeLog | 4 ++++ elmo/elmo-vars.el | 16 ++++++++++------ 2 files changed, 14 insertions(+), 6 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index ba61446..51e161c 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,5 +1,9 @@ 2006-01-22 Hiroya Murata + * elmo-vars.el (elmo-mailing-list-name-spec-list): Fixed + customization type. + (elmo-mailing-list-count-spec-list): Ditto. + * elmo-vars.el (elmo-mailing-list-name-spec-list): Merge entries for `list-id'. diff --git a/elmo/elmo-vars.el b/elmo/elmo-vars.el index b580c94..160fea5 100644 --- a/elmo/elmo-vars.el +++ b/elmo/elmo-vars.el @@ -455,9 +455,11 @@ Arguments for this function are NAME, BUFFER, HOST and SERVICE.") :type '(repeat (choice (symbol :tag "Field Name") (list (symbol :tag "Field Name") - (choice regexp - (cons regexp - (integer :tag "Match Index")))))) + (repeat + :inline symbol + (choice regexp + (cons regexp + (integer :tag "Match Index"))))))) :group 'elmo) (defcustom elmo-mailing-list-count-spec-list @@ -470,9 +472,11 @@ Arguments for this function are NAME, BUFFER, HOST and SERVICE.") :type '(repeat (choice (symbol :tag "Field Name") (list (symbol :tag "Field Name") - (choice regexp - (cons regexp - (integer :tag "Match Index")))))) + (repeat + :inline symbol + (choice regexp + (cons regexp + (integer :tag "Match Index"))))))) :group 'elmo) (require 'product) -- 1.7.10.4