diff options
author | Michael Albinus <michael.albinus@gmx.de> | 2010-05-28 16:57:11 +0200 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2010-05-28 16:57:11 +0200 |
commit | f5783df3a76e578791965f852b9190235507556c (patch) | |
tree | 71ba696fa55b00481b40b48fa9136f8f56ef5aec /src/fileio.c | |
parent | b6827fff7a48f14e7d3870c74f14ecd17ca750d1 (diff) | |
download | emacs-f5783df3a76e578791965f852b9190235507556c.tar.gz |
* fileio.c (Fdelete_file): Pass TRASH arg to handler call.
Diffstat (limited to 'src/fileio.c')
-rw-r--r-- | src/fileio.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fileio.c b/src/fileio.c index d3aea0f1e91..dc5ca37ff2f 100644 --- a/src/fileio.c +++ b/src/fileio.c @@ -1925,7 +1925,7 @@ A prefix arg makes KEEP-TIME non-nil. If PRESERVE-UID-GID is non-nil, we try to transfer the uid and gid of FILE to NEWNAME. -If PRESERVE-SELINUX-CONTEXT is non-nil and SELinux is enabled +If PRESERVE-SELINUX-CONTEXT is non-nil and SELinux is enabled on the system, we copy the SELinux context of FILE to NEWNAME. */) (file, newname, ok_if_already_exists, keep_time, preserve_uid_gid, preserve_selinux_context) Lisp_Object file, newname, ok_if_already_exists, keep_time; @@ -2221,7 +2221,7 @@ With a prefix argument, TRASH is nil. */) handler = Ffind_file_name_handler (filename, Qdelete_file); if (!NILP (handler)) - return call2 (handler, Qdelete_file, filename); + return call3 (handler, Qdelete_file, filename, trash); if (delete_by_moving_to_trash && !NILP (trash)) return call1 (Qmove_file_to_trash, filename); |