[Emacs-diffs] emacs/lisp/net tramp-fish.el

[Michael Albinus]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Michael Albinus <albinus>       09/11/07 23:53:29

Modified files:
        lisp/net       : tramp-fish.el 

Log message:
        * net/tramp-compat.el (tramp-compat-copy-directory)
        (tramp-compat-delete-directory): New defuns.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/net/tramp-fish.el?cvsroot=emacs&r1=1.22&r2=1.23

Patches:
Index: tramp-fish.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/net/tramp-fish.el,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -b -r1.22 -r1.23
--- tramp-fish.el       1 Oct 2009 15:35:35 -0000       1.22
+++ tramp-fish.el       7 Nov 2009 23:53:29 -0000       1.23
@@ -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