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

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

diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index 1ac6208313a2a9213e2405fc9a457fb82202307e..6bef35963cd811bee219ba0962aa92d5c6df5b97 100644 (file)
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -463,6 +463,11 @@ with a prefix argument."
 \f
 ;;; 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))