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."
 	(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