gnus-art.el (gnus-mime-delete-part): Fix mm-handle-filename usage.

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 9eebb585c14..8fc80eefbe1 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
+2011-05-24  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+        * gnus-art.el (gnus-mime-delete-part): Fix mm-handle-filename usage.
+
 2011-05-20  Teodor Zlatanov  <tzz@lifelogs.com>
 
         * gnus-sum.el (gnus-summary-hide-thread): Fix bug where moving to hide
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 5ba962d1d39..3ebb5cc719b 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -5048,7 +5048,7 @@ Deleting parts may malfunction or destroy the article; continue? "))
             (let ((desc (mm-handle-description data)))
               (when desc
                 (mail-decode-encoded-word-string desc))))
-           (filename (or (mm-handle-filename (mm-handle-disposition data)) "(none)"))
+           (filename (or (mm-handle-filename data) "(none)"))
            (type (mm-handle-media-type data)))
       (unless data
         (error "No MIME part under point"))