mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 08:43:40 -07:00
Code Issues Projects Releases Wiki Activity

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

Browse source 
mailcap-mime-info, make-symbolic-link): Declare as functions.
This commit is contained in:
Juanma Barranquero 2007-11-22 13:49:34 +00:00
parent f36d1cdc01
commit 8e845e23f4
1 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/dired-aux.el
View file

@ -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))