* lisp/files.el (delete-directory): Fix typo in last change.
authorChong Yidong <cyd@stupidchicken.com>
Wed, 27 Jan 2010 03:36:36 +0000 (22:36 -0500)
committerChong Yidong <cyd@stupidchicken.com>
Wed, 27 Jan 2010 03:36:36 +0000 (22:36 -0500)
lisp/files.el

index bcaba30..d372ff3 100644 (file)
@@ -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.