PreferredLocale to CurrentCulture?

[albertfonts]

I need to make a change when the module sets the user preferredLocale, we need to set this property to the current culture insted of PortalSettings.DefaultLanguage line 470

oUser.Profile.PreferredLocale = System.Threading.Thread.CurrentThread.CurrentCulture.ToString()

I suggest you to make this change in your code.