Remove locales from languages

The result of `Zend_Locale::getTranslationList('language')` may contain locales (for example: `en_US`) in addition to languages (for example: `en`).
Let's remove them.