From 58261373dbd7f0121e471fc18b6546bc560391aa Mon Sep 17 00:00:00 2001 From: yamaoka Date: Wed, 25 Apr 2001 21:57:20 +0000 Subject: [PATCH] Synch with Oort Gnus. --- lisp/ChangeLog | 4 ++++ lisp/mm-uu.el | 11 ++++------- 2 files changed, 8 insertions(+), 7 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c08489d..92fadbd 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2001-04-25 Per Abrahamsen + + * mm-uu.el (mm-uu-configure-list): Fixed customize type. + 2001-04-24 Hrvoje Niksic * mm-view.el (mm-display-inline-fontify): Allow XEmacs to fully diff --git a/lisp/mm-uu.el b/lisp/mm-uu.el index dd79e12..5893298 100644 --- a/lisp/mm-uu.el +++ b/lisp/mm-uu.el @@ -132,13 +132,10 @@ This can be either \"inline\" or \"attachment\".") "A list of mm-uu configuration. To disable dissecting shar codes, for instance, add `(shar . disabled)' to this list." - :type `(repeat (cons - ,(cons 'choice - (mapcar - (lambda (entry) - (cons 'item (car entry))) - mm-uu-type-alist)) - (choice (item disabled)))) + :type 'alist + :options (mapcar (lambda (entry) + (list (car entry) '(const disabled))) + mm-uu-type-alist) :group 'gnus-article-mime) ;; functions -- 1.7.10.4