mm-util.el (mm-handle-filename): Move to mm-decode.el (bug#8330).

[gnu-emacs] / lisp / gnus / mm-util.el

diff --git a/lisp/gnus/mm-util.el b/lisp/gnus/mm-util.el
index d53784e8cc412f475639f859e26a8b0addc7d145..435c3bba00fd251e0b5fc2c73d16092d532cdeac 100644 (file)
--- a/lisp/gnus/mm-util.el
+++ b/lisp/gnus/mm-util.el
@@ -1667,13 +1667,6 @@ gzip, bzip2, etc. are allowed."
        (when decomp
          (kill-buffer (current-buffer)))))))
 
-(defun mm-handle-filename (handle)
-  "Return filename of HANDLE if any."
-  (or (mail-content-type-get (mm-handle-type handle)
-                             'name)
-      (mail-content-type-get (mm-handle-disposition handle)
-                             'filename)))
-
 (provide 'mm-util)
 
 ;;; mm-util.el ends here