[emacs] problem in `delete-directory' with enabled `delete-by-removing-to-trash'

[Andrey Torba]

Hi All,
There is a strange behavior of `delete-directory' function with
enabled flag `delete-by-removing-to-trash'. It deletes files one by
one instead of applying `move-file-to-trash' to the directory? As a
result emacs deletes big directories slowly and after deleting there
are many files in the trash directory, so it is impossible to restore.

Directory structure:
ddd/
   ccc/
       1.txt

There are three files in the trash after deleting `ddd' instead of
one:
ddd/
ccc/
1.txt

How to solve the problem? As a solution i see making advice function
for `delete-directory'.

-- 
Regards, Andrey