diff options
| author | Michael Albinus | 2009-11-07 23:53:29 +0000 |
|---|---|---|
| committer | Michael Albinus | 2009-11-07 23:53:29 +0000 |
| commit | 3426871b168057ccf7d655a50220e21052b06b9a (patch) | |
| tree | 2b0ecdc2c4efbb80d9d10606ddcfb60a5b942010 | |
| parent | b000a6e24e98f0713c150c1e5c845608797455a3 (diff) | |
| download | emacs-3426871b168057ccf7d655a50220e21052b06b9a.tar.gz emacs-3426871b168057ccf7d655a50220e21052b06b9a.zip | |
* net/tramp-compat.el (tramp-compat-copy-directory)
(tramp-compat-delete-directory): New defuns.
| -rw-r--r-- | lisp/net/tramp-fish.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/tramp-fish.el b/lisp/net/tramp-fish.el index 215ada5d234..8db5dc82fd9 100644 --- a/lisp/net/tramp-fish.el +++ b/lisp/net/tramp-fish.el | |||
| @@ -319,7 +319,7 @@ pass to the OPERATION." | |||
| 319 | (mapc | 319 | (mapc |
| 320 | (lambda (file) | 320 | (lambda (file) |
| 321 | (if (file-directory-p file) | 321 | (if (file-directory-p file) |
| 322 | (delete-directory file recursive) | 322 | (tramp-compat-delete-directory file recursive) |
| 323 | (delete-file file))) | 323 | (delete-file file))) |
| 324 | ;; We do not want to delete "." and "..". | 324 | ;; We do not want to delete "." and "..". |
| 325 | (directory-files | 325 | (directory-files |