diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2017-09-20 11:49:12 -0700 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2017-09-20 11:50:35 -0700 |
commit | 047f02f00f602b9aef63ae8938e12f3f0ab481eb (patch) | |
tree | 05bb7bce7b212be58d92af124224adb8756329ad /lisp/files.el | |
parent | fbd15836af69b1d156f39664f2512f85278fdb08 (diff) | |
download | emacs-047f02f00f602b9aef63ae8938e12f3f0ab481eb.tar.gz |
Fix new copy-directory bug with empty dirs
Problem reported by Afdam Plaice (Bug#28520) and by Eli Zaretskii
(Bug#28483#34). This is another bug that I introduced in my
recent copy-directory changes.
* lisp/files.el (copy-directory): Work with empty subdirectories, too.
* test/lisp/files-tests.el (files-tests--copy-directory):
Test for this bug.
Diffstat (limited to 'lisp/files.el')
-rw-r--r-- | lisp/files.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index 0c30d40c13b..f0a1f2380d9 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -5564,7 +5564,7 @@ into NEWNAME instead." (filetype (car (file-attributes file)))) (cond ((eq filetype t) ; Directory but not a symlink. - (copy-directory file newname keep-time parents)) + (copy-directory file target keep-time parents t)) ((stringp filetype) ; Symbolic link (make-symbolic-link filetype target t)) ((copy-file file target t keep-time))))) |