From fe02ba07643f773422679b37e480b3b3fdcb369a Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 22 Nov 2004 16:53:41 +0000 Subject: [PATCH] (dired-recursive-copies): Moved from dired-aux.el. --- lisp/dired.el | 13 +++++++++++++ 1 file changed, 13 insertions(+) diff --git a/lisp/dired.el b/lisp/dired.el index de65b3b54ac..19ea0768e2b 100644 --- a/lisp/dired.el +++ b/lisp/dired.el @@ -3153,6 +3153,19 @@ To be called first in body of `dired-sort-other', etc." ;;;; Drag and drop support +(defcustom dired-recursive-copies nil + "*Decide whether recursive copies are allowed. +nil means no recursive copies. +`always' means copy recursively without asking. +`top' means ask for each directory at top level. +Anything else means ask for each directory." + :type '(choice :tag "Copy directories" + (const :tag "No recursive copies" nil) + (const :tag "Ask for each directory" t) + (const :tag "Ask for each top directory only" top) + (const :tag "Copy directories without asking" always)) + :group 'dired) + (defun dired-dnd-test-function (window action types) "The test function for drag and drop into dired buffers. WINDOW is where the mouse is when this function is called. It may be a frame -- 2.39.2