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

This commit is contained in:
Chong Yidong 2010-01-26 22:36:36 -05:00
parent 8b0e68ea3f
commit 1d78a74696

View 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.