Commit e9a0aef8 authored by Michael Albinus's avatar Michael Albinus
Browse files

* w32fns.c (Fsystem_move_file_to_trash): Use delete-directory.

parent c5c21b70
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):
......
......@@ -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);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment