From: Chong Yidong <cyd@stupidchicken.com>
Date: Thu, 7 Jun 2007 16:51:54 +0000 (+0000)
Subject: (dired-recursive-deletes, dired-recursive-copies): Change default to
X-Git-Tag: emacs-pretest-22.1.90~1370
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1ebebaeafadf21de562df27e9a5ef4ec95e14baf;p=emacs.git

(dired-recursive-deletes, dired-recursive-copies): Change default to
`top'.
---

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.