From: Katsumi Yamaoka Date: Tue, 24 May 2011 09:46:18 +0000 (+0000) Subject: gnus-art.el (gnus-mime-delete-part): Fix mm-handle-filename usage. X-Git-Tag: emacs-pretest-24.0.90~104^2~618^2~178 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=88a7a941cb7adb71cf6abc8a257a2628f0ee25bd;p=emacs.git gnus-art.el (gnus-mime-delete-part): Fix mm-handle-filename usage. --- 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 + + * gnus-art.el (gnus-mime-delete-part): Fix mm-handle-filename usage. + 2011-05-20 Teodor Zlatanov * 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"))