(dired-recursive-deletes): Fix custom type.

This commit is contained in:
Richard M. Stallman 2003-01-06 01:20:35 +00:00
parent 19c17c4ec5
commit 53ade5c75e

View file

@ -2046,10 +2046,11 @@ nil means no recursive deletes.
`top' means ask for each directory at top level, but delete its subdirectories
without asking.
Anything else means ask for each directory."
:type '(choice :tag "Delete not empty directory"
(const :tag "No. Only empty directories" nil)
(const :tag "Ask for each directory" t)
(const :tag "Ask for each top directory only" top))
:type '(choice :tag "Delete non-empty directories"
(const :tag "Yes" always)
(const :tag "No--only delete empty directories" nil)
(const :tag "Confirm for each directory" t)
(const :tag "Confirm for each top directory only" top))
:group 'dired)
;; Match anything but `.' and `..'.