bug#8006: 23.2.93; rmail-mime says "Not a MIME message"

[Glenn Morris]

But if you want this feature, does this work?

*** lisp/mail/rmailmm.el        2011-11-22 02:55:06 +0000
--- lisp/mail/rmailmm.el        2011-11-23 23:44:08 +0000
***************
*** 1269,1275 ****
                             (or arg (goto-char (point-min)))
                             (point)) 'rmail-mime-entity)))
              (if (or (not arg) entity) (rmail-mime-toggle-raw state)))
!         (message "Not a MIME message")))
      (let* ((data (rmail-apply-in-message rmail-current-message 
'buffer-string))
           (buf (get-buffer-create "*RMAIL*"))
           (rmail-mime-mbox-buffer rmail-view-buffer)
--- 1269,1277 ----
                             (or arg (goto-char (point-min)))
                             (point)) 'rmail-mime-entity)))
              (if (or (not arg) entity) (rmail-mime-toggle-raw state)))
!         (progn
!           (message "Not a MIME message, just toggling headers")
!           (rmail-toggle-header))))
      (let* ((data (rmail-apply-in-message rmail-current-message 
'buffer-string))
           (buf (get-buffer-create "*RMAIL*"))
           (rmail-mime-mbox-buffer rmail-view-buffer)