From: Juanma Barranquero Date: Thu, 22 Nov 2007 13:49:34 +0000 (+0000) Subject: (mailcap-parse-mailcaps, mailcap-parse-mimetypes, mailcap-extension-to-mime, X-Git-Tag: emacs-pretest-23.0.90~9561 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8e845e23f4f0aff065587fee41e7ae335332f602;p=emacs.git (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 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))