diff --git a/messages/uniworx/categories/user/de-de-formal.msg b/messages/uniworx/categories/user/de-de-formal.msg index a0f61a0ab..a6d97c2f3 100644 --- a/messages/uniworx/categories/user/de-de-formal.msg +++ b/messages/uniworx/categories/user/de-de-formal.msg @@ -97,6 +97,7 @@ UserRemoveSupervisor: Alle Ansprechpartner entfernen UserRemoveSubordinates: Alle Ansprechpartnerbeziehungen zu Untergebenen beenden UserIsSupervisor: Ist Ansprechpartner UserAvsSwitchCompany: Als Primärfirma verwenden +UserAvsSwitchCompanyField: Primärfirma auswählen UserAvsCompanySwitched c@CompanyShorthand: Primärfirma gewechselt zu #{tshow c} AllUsersLdapSync: Alle LDAP-Synchronisieren AllUsersAvsSync: Alle AVS-Synchronisieren diff --git a/messages/uniworx/categories/user/en-eu.msg b/messages/uniworx/categories/user/en-eu.msg index 318b4fbc5..af9193b03 100644 --- a/messages/uniworx/categories/user/en-eu.msg +++ b/messages/uniworx/categories/user/en-eu.msg @@ -97,6 +97,7 @@ UserRemoveSupervisor: Set to unsupervised UserRemoveSubordinates: Remove all subordinates UserIsSupervisor: Is supervisor UserAvsSwitchCompany: Use as primary company +UserAvsSwitchCompanyField: Select primary company UserAvsCompanySwitched c: Primary company switched to #{tshow c} AllUsersLdapSync: Synchronise all with LDAP AllUsersAvsSync: Synchronise all with AVS diff --git a/src/Handler/Admin/Avs.hs b/src/Handler/Admin/Avs.hs index 90e15c3f3..65705b218 100644 --- a/src/Handler/Admin/Avs.hs +++ b/src/Handler/Admin/Avs.hs @@ -719,7 +719,7 @@ postAdminAvsUserR uuid = do let switchCompForm :: AForm (HandlerFor UniWorX) (CryptoUUIDUser,CompanyId) switchCompForm = (,) <$> apopt hiddenField "" (Just uuid) - <*> areq (selectFieldList [(ciOriginal cn, cid) | (cn, cid) <- availComps]) "new primary company" mbPrime + <*> areq (selectFieldList [(ciOriginal cn, cid) | (cn, cid) <- availComps]) (fslI MsgUserAvsSwitchCompanyField) mbPrime <* aopt (buttonField UserAvsSwitchCompany) "" Nothing switchCompValidate :: FormValidator (CryptoUUIDUser,CompanyId) Handler () switchCompValidate = do