From: Chong Yidong <cyd@stupidchicken.com>
Date: Wed, 27 Jan 2010 03:36:36 +0000 (-0500)
Subject: * lisp/files.el (delete-directory): Fix typo in last change.
X-Git-Tag: emacs-pretest-23.1.92~28^2~3
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1d78a746965605e9ed6a3a377c5dd63f692b3ff6;p=emacs.git

* lisp/files.el (delete-directory): Fix typo in last change.
---

diff --git a/lisp/files.el b/lisp/files.el
index bcaba300ae6..d372ff3420a 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -4692,8 +4692,8 @@ If RECURSIVE is non-nil, all files in DIRECTORY are deleted as well."
 		    (delete-file file)))
 		;; We do not want to delete "." and "..".
 		(directory-files
-		 directory 'full directory-files-no-dot-files-regexp))
-	(delete-directory-internal directory))))))
+		 directory 'full directory-files-no-dot-files-regexp)))
+      (delete-directory-internal directory)))))
 
 (defun copy-directory (directory newname &optional keep-time parents)
   "Copy DIRECTORY to NEWNAME.  Both args must be strings.