(FileSystem disk workingDirectory / 'fooFolder3') ensureDirectory. 
(FileSystem disk workingDirectory / 'fooFolder3') ensureDeleted. 

works

I get a primitive failure

(FileSystem disk workingDirectory / 'fooFolder') createDirectory.
(FileSystem disk workingDirectory / 'fooFolder' / 'fooInsidefoo') 
createDirectory.
(FileSystem disk workingDirectory / 'fooFolder') ensureDeleted. 

because 

ensureDeleted is defined as 

ensureDeleted
        self deleteIfAbsent: [].

and it would be better to define it as 

ensureDeleted
        self deleteAll.

What do you think?

Reply via email to