From 1ebebaeafadf21de562df27e9a5ef4ec95e14baf Mon Sep 17 00:00:00 2001
From: Chong Yidong <cyd@stupidchicken.com>
Date: Thu, 7 Jun 2007 16:51:54 +0000
Subject: (dired-recursive-deletes, dired-recursive-copies): Change default to
 `top'.

---
 lisp/dired.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lisp/dired.el')

diff --git a/lisp/dired.el b/lisp/dired.el
index 5b99e47c7d0..ba488fc9c6a 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -2358,7 +2358,7 @@ Optional argument means return a file name relative to `default-directory'."
 
 ;; Deleting files
 
-(defcustom dired-recursive-deletes nil ; Default only delete empty directories.
+(defcustom dired-recursive-deletes 'top
   "*Decide whether recursive deletes are allowed.
 A value of nil means no recursive deletes.
 `always' means delete recursively without asking.  This is DANGEROUS!
@@ -3206,7 +3206,7 @@ To be called first in body of `dired-sort-other', etc."
 
 ;;;;  Drag and drop support
 
-(defcustom dired-recursive-copies nil
+(defcustom dired-recursive-copies 'top
   "*Decide whether recursive copies are allowed.
 A value of nil means no recursive copies.
 `always' means copy recursively without asking.
-- 
cgit v1.2.3