;;;
(defconst tm-gnus/RCS-ID
- "$Id: tm-gnus5.el,v 7.72 1996/06/27 14:35:40 morioka Exp $")
+ "$Id: tm-gnus5.el,v 7.72 1996/06/27 14:35:40 morioka Exp morioka $")
(defconst tm-gnus/version
(concat (get-version-string tm-gnus/RCS-ID) " for Gnus 5.2 or later"))
(set-buffer gnus-summary-buffer)
mime/default-coding-system)))
(mime/viewer-mode nil nil nil gnus-original-article-buffer
- gnus-article-buffer)
+ gnus-article-buffer
+ gnus-article-mode-map)
)
(setq tm-gnus/automatic-mime-preview t)
(run-hooks 'tm-gnus/article-prepare-hook)