changeset 105896:471721be8fba

* net/tramp-fish.el (tramp-fish-handle-delete-directory): * net/tramp-gvfs.el (tramp-gvfs-handle-delete-directory): Use `tramp-compat-delete-directory'.
author Michael Albinus <michael.albinus@gmx.de>
date Sat, 07 Nov 2009 23:54:29 +0000
parents 1b0e58de42e6
children d8ba90718d44
files lisp/net/tramp-gvfs.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/net/tramp-gvfs.el	Sat Nov 07 23:53:54 2009 +0000
+++ b/lisp/net/tramp-gvfs.el	Sat Nov 07 23:54:29 2009 +0000
@@ -522,7 +522,8 @@
 
 (defun tramp-gvfs-handle-delete-directory (directory &optional recursive)
   "Like `delete-directory' for Tramp files."
-  (delete-directory (tramp-gvfs-fuse-file-name directory) recursive))
+  (tramp-compat-delete-directory
+   (tramp-gvfs-fuse-file-name directory) recursive))
 
 (defun tramp-gvfs-handle-delete-file (filename)
   "Like `delete-file' for Tramp files."