improve UserHomeDir()