(mime-view-application/pgp): Use `mime-entity-cooked-p'.

diff --git a/mime-pgp.el b/mime-pgp.el
index 1324a7b..67fbb6e 100644 (file)
--- a/mime-pgp.el
+++ b/mime-pgp.el
@@ -92,7 +92,8 @@
           (while (re-search-forward "^- -" nil t)
             (replace-match "-")
             )
-          (setq representation-type (mime-entity-representation-type entity))
+          (setq representation-type (if (mime-entity-cooked-p entity)
+                                        'cooked))
           )
          ((progn
             (goto-char (point-min))