function RemoveDir(p$)
Removes a directory.