* w32fns.c (Fsystem_move_file_to_trash): Use delete-directory.
This commit is contained in:
parent
c5c21b70c1
commit
e9a0aef83c
2 changed files with 8 additions and 1 deletions
|
@ -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):
|
||||
|
|
|
@ -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);
|
||||
|
|
Loading…
Add table
Reference in a new issue