diff lisp/cus-start.el @ 96489:b76b9628d74f

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.
author Jason Rumney <jasonr@gnu.org>
date Wed, 02 Jul 2008 13:19:07 +0000
parents b877913c0692
children 9592c50233ab
line wrap: on
line diff
--- a/lisp/cus-start.el	Wed Jul 02 13:17:41 2008 +0000
+++ b/lisp/cus-start.el	Wed Jul 02 13:19:07 2008 +0000
@@ -164,6 +164,8 @@
 					    :value (nil)
 					    (symbol :format "%v"))
 				    (const :tag "always" t)))
+             ;; fileio.c
+             (delete-by-moving-to-trash auto-save boolean "23.1")
 	     ;; fns.c
 	     (use-dialog-box menu boolean "21.1")
 	     (use-file-dialog menu boolean "22.1")