diff lisp/net/tramp-fish.el @ 105894:ae9f17f9fa46

* net/tramp-compat.el (tramp-compat-copy-directory) (tramp-compat-delete-directory): New defuns.
author Michael Albinus <michael.albinus@gmx.de>
date Sat, 07 Nov 2009 23:53:29 +0000
parents f92b20f3ef80
children 9e96dbbd314e
line wrap: on
line diff
--- a/lisp/net/tramp-fish.el	Sat Nov 07 23:52:48 2009 +0000
+++ b/lisp/net/tramp-fish.el	Sat Nov 07 23:53:29 2009 +0000
@@ -319,7 +319,7 @@
 	(mapc
 	 (lambda (file)
 	   (if (file-directory-p file)
-	       (delete-directory file recursive)
+	       (tramp-compat-delete-directory file recursive)
 	     (delete-file file)))
 	 ;; We do not want to delete "." and "..".
 	 (directory-files