diff options
| author | Jason Rumney <[email protected]> | 2008-07-02 13:19:07 +0000 |
|---|---|---|
| committer | Jason Rumney <[email protected]> | 2008-07-02 13:19:07 +0000 |
| commit | 6cf29fe81529606336b0d1ac167af5a62b9843a3 (patch) | |
| tree | ce0ce54a6ec8cad9315b1a7caaf5d3036e6325c2 /src/lisp.h | |
| parent | 56fd9faa2f35556996de5777734663de5ad235e3 (diff) | |
Changes from Toru Tsuneyoshi for using Trash can when deleting files.
* files.el (backup-extract-version): Handle versioned directories.
(trash-directory): New variable.
(move-file-to-trash): New function.
* cus-start.el (delete-by-moving-to-trash): Declare for custom.
* lisp.h (Qdelete_file, Qdelete_directory): Declare extern.
* fileio.c (delete_by_moving_to_trash, Qmove_file_to_trash): New vars.
(syms_of_fileio): Initialize and export them.
(Fdelete_directory, Fdelete_file): Optionally delete via trash.
* w32fns.c (FOF_NO_CONNECTED_ELEMENTS): Define if not already.
(Fsystem_move_file_to_trash): New function.
(syms_of_w32fns): Export it to lisp.
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/lisp.h b/src/lisp.h index e126f57527..75a0fc37a8 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -2935,6 +2935,8 @@ extern void syms_of_fileio P_ ((void)); extern void init_fileio_once P_ ((void)); extern Lisp_Object make_temp_name P_ ((Lisp_Object, int)); EXFUN (Fmake_symbolic_link, 3); +extern Lisp_Object Qdelete_directory; +extern Lisp_Object Qdelete_file; /* Defined in abbrev.c */ |