(mailcap-parse-mailcaps, mailcap-parse-mimetypes, mailcap-extension-to-mime,

mailcap-mime-info, make-symbolic-link): Declare as functions.

1 files changed, 7 insertions, 0 deletions

diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index 1ac6208313a..6bef35963cd 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -463,6 +463,11 @@ with a prefix argument."
 
 ;;; Shell commands
 
+(declare-function mailcap-parse-mailcaps "gnus/mailcap" (&optional path force))
+(declare-function mailcap-parse-mimetypes "gnus/mailcap" (&optional path force))
+(declare-function mailcap-extension-to-mime "gnus/mailcap" (extn))
+(declare-function mailcap-mime-info "gnus/mailcap" (string &optional request))
+
 (defun dired-read-shell-command-default (files)
   "Return a list of default commands for `dired-read-shell-command'."
   (require 'mailcap)
@@ -1196,6 +1201,8 @@ Special value `always' suppresses confirmation."
   (dired-copy-file-recursive from to ok-flag dired-copy-preserve-time t
                              dired-recursive-copies))
 
+(declare-function make-symbolic-link "fileio.c")
+
 (defun dired-copy-file-recursive (from to ok-flag &optional
                                        preserve-time top recursive)
   (let ((attrs (file-attributes from))