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

diff --git a/lisp/files.el b/lisp/files.el
index bcaba300ae603d7bf031903009bfba54f07082f4..d372ff3420ad5e8c7f586c931d6ecce224bb6d8d 100644 (file)
--- 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.