-;; which are suppressed by "-q" option.
-
-;; The following definition is what I'm using with GNUS 4:
-;;(setq gnus-show-mime-method
-;; (function
-;; (lambda ()
-;; (metamail-interpret-header)
-;; (let ((metamail-switches ;Suppress header fields in a body.
-;; (append metamail-switches '("-q"))))
-;; (metamail-interpret-body)))))