mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* net/tramp-gvfs.el (tramp-gvfs-handle-delete-directory): Handle

Browse source 
optional parameter RECURSIVE.
This commit is contained in:
Michael Albinus 2009-10-01 15:39:25 +00:00
parent ecacb4d68c
commit 93776a8c4a
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/net/tramp-gvfs.el
View file

@ -520,9 +520,9 @@ is no information where to trace the message.")
newname)
ok-if-already-exists keep-date preserve-uid-gid))
(defun tramp-gvfs-handle-delete-directory (directory)
(defun tramp-gvfs-handle-delete-directory (directory &optional recursive)
"Like `delete-directory' for Tramp files."
(delete-directory (tramp-gvfs-fuse-file-name directory)))
(delete-directory (tramp-gvfs-fuse-file-name directory) recursive))
(defun tramp-gvfs-handle-delete-file (filename)
"Like `delete-file' for Tramp files."