diff options
| author | Chong Yidong | 2010-01-26 22:36:36 -0500 |
|---|---|---|
| committer | Chong Yidong | 2010-01-26 22:36:36 -0500 |
| commit | 1d78a746965605e9ed6a3a377c5dd63f692b3ff6 (patch) | |
| tree | 0259eda50017e36fef82db9eb1854013a5c11bd2 | |
| parent | 8b0e68ea3fd559cbdfd0c532d789d0bad73890df (diff) | |
| download | emacs-1d78a746965605e9ed6a3a377c5dd63f692b3ff6.tar.gz emacs-1d78a746965605e9ed6a3a377c5dd63f692b3ff6.zip | |
* lisp/files.el (delete-directory): Fix typo in last change.
| -rw-r--r-- | lisp/files.el | 4 |
1 files changed, 2 insertions, 2 deletions
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." | |||
| 4692 | (delete-file file))) | 4692 | (delete-file file))) |
| 4693 | ;; We do not want to delete "." and "..". | 4693 | ;; We do not want to delete "." and "..". |
| 4694 | (directory-files | 4694 | (directory-files |
| 4695 | directory 'full directory-files-no-dot-files-regexp)) | 4695 | directory 'full directory-files-no-dot-files-regexp))) |
| 4696 | (delete-directory-internal directory)))))) | 4696 | (delete-directory-internal directory))))) |
| 4697 | 4697 | ||
| 4698 | (defun copy-directory (directory newname &optional keep-time parents) | 4698 | (defun copy-directory (directory newname &optional keep-time parents) |
| 4699 | "Copy DIRECTORY to NEWNAME. Both args must be strings. | 4699 | "Copy DIRECTORY to NEWNAME. Both args must be strings. |