[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/dired-aux.el
From: |
Luc Teirlinck |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/dired-aux.el |
Date: |
Tue, 08 Jun 2004 21:05:29 -0400 |
Index: emacs/lisp/dired-aux.el
diff -c emacs/lisp/dired-aux.el:1.121 emacs/lisp/dired-aux.el:1.122
*** emacs/lisp/dired-aux.el:1.121 Wed Jun 9 00:25:30 2004
--- emacs/lisp/dired-aux.el Wed Jun 9 01:04:28 2004
***************
*** 255,260 ****
--- 255,261 ----
(error "chown not supported on this system"))
(dired-do-chxxx "Owner" dired-chown-program 'chown arg))
+ ;;;###autoload
(defun dired-do-touch (&optional arg)
"Change the timestamp of the marked (or next ARG) files.
This calls touch."
***************
*** 342,347 ****
--- 343,349 ----
(defvar dired-file-version-alist)
+ ;;;###autoload
(defun dired-clean-directory (keep)
"Flag numerical backups for deletion.
Spares `dired-kept-versions' latest versions, and `kept-old-versions' oldest.
***************
*** 551,556 ****
--- 553,559 ----
(funcall stuff-it files)))))
;; This is an extra function so that it can be redefined by ange-ftp.
+ ;;;###autoload
(defun dired-run-shell-command (command)
(let ((handler
(find-file-name-handler (directory-file-name default-directory)
***************
*** 805,810 ****
--- 808,814 ----
;; None of these keys quit - use C-g for that.
))
+ ;;;###autoload
(defun dired-query (qs-var qs-prompt &rest qs-args)
;; Query user and return nil or t.
;; Store answer in symbol VAR (which must initially be bound to nil).