Make list_translations return the correct default locale

The current implementation ignore ```BABEL_DEFAULT_LOCALE``` and returns the ```default_locale ``` passed to Babel.\__init__