diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2009-10-02 06:01:32 +0000 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2009-10-02 06:01:32 +0000 |
| commit | e9a0aef83c8176a32bc29ef342c68b91b73c64f5 (patch) | |
| tree | 2100a778d69f21eaeaa4de6e755b3653f4e540bb | |
| parent | c5c21b70c11e8ebe8d989f4c92265949f3691f85 (diff) | |
| download | emacs-e9a0aef83c8176a32bc29ef342c68b91b73c64f5.tar.gz | |
* w32fns.c (Fsystem_move_file_to_trash): Use delete-directory.
| -rw-r--r-- | src/ChangeLog | 7 | ||||
| -rw-r--r-- | src/w32fns.c | 2 |
2 files changed, 8 insertions, 1 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index cde4eb9dc9c..4226e20fd1b 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,10 @@ +2009-10-02 Michael Albinus <michael.albinus@gmx.de> + + * lisp.h (Qdelete_directory_internal): Removed, because it is not + used anymore outside fileio.c. + + * w32fns.c (Fsystem_move_file_to_trash): Use delete-directory. + 2009-10-01 Juanma Barranquero <lekktu@gmail.com> * lisp.h (Qdelete_directory_internal): diff --git a/src/w32fns.c b/src/w32fns.c index 2b6b12e671c..8003d791719 100644 --- a/src/w32fns.c +++ b/src/w32fns.c @@ -6218,7 +6218,7 @@ DEFUN ("system-move-file-to-trash", Fsystem_move_file_to_trash, if (!NILP (Ffile_directory_p (filename)) && NILP (Ffile_symlink_p (filename))) { - operation = Qdelete_directory_internal; + operation = intern ("delete-directory"); filename = Fdirectory_file_name (filename); } filename = Fexpand_file_name (filename, Qnil); |