$newline never $# SPDX-FileCopyrightText: 2022 Gregor Kleen ,Sarah Vaupel ,Steffen Jost ,Winnie Ros $# $# SPDX-License-Identifier: AGPL-3.0-or-later
_{MsgIdent}
#{userIdent}
_{MsgAuthModeSet}
_{userAuthentication} $maybe avs <- avsId
_{MsgAvsPersonNo} ^{messageTooltip tooltipAvsPersNo}
#{view _userAvsNoPerson avs}
_{MsgNameSet}
^{nameWidget userDisplayName userSurname} $maybe matnr <- userMatrikelnummer
_{MsgTableMatrikelNr}
#{matnr} $maybe sex <- userSex
_{MsgTableSex}
_{sex} $maybe bday <- userBirthday
_{MsgTableBirthday}
^{formatTimeW SelFormatDate bday}
_{MsgPrefersPostal}
#{iconLetterOrEmail userPrefersPostal} $maybe addr <- userPostAddress
_{MsgAdminUserPostAddress}
#{addr} $maybe postUpdate <- userPostLastUpdate
_{MsgUserPostLastUpdate}
^{formatTimeW SelFormatDateTime postUpdate}
_{MsgUserDisplayEmail}
#{mailtoHtml userDisplayEmail} $if not (validEmail' userDisplayEmail) \ ^{messageTooltip tooltipInvalidEmail} $if userEmail /= userDisplayEmail
_{MsgUserSystemEmail}
#{userEmail} $if not (validEmail' userEmail) \ ^{messageTooltip tooltipInvalidEmail}
_{MsgAdminUserPinPassword}
$maybe pass <- userPinPassword #{pass} $nothing _{MsgAdminUserNoPassword} $maybe telephonenr <- userTelephone
_{MsgUserTelephone}
#{telephonenr} $maybe mobilenr <- userMobile
_{MsgUserMobile}
#{mobilenr} $maybe companyDepartment <- userCompanyDepartment
_{MsgCompanyDepartment}
#{companyDepartment} $maybe companyPersonalNumber <- userCompanyPersonalNumber
_{MsgCompanyPersonalNumber}
#{companyPersonalNumber} $if not $ null companies
_{MsgCompany}
^{toWgt (mconcat companies)} $if numSupervisors > 0
_{MsgProfileSupervisor} $if numSupervisors > 3 \ #{numSupervisors}
^{mconcat supervisors} $if numSupervisees > 0
_{MsgProfileSupervisee} $if length supervisees > 3 \ #{numSupervisees}
^{mconcat supervisees} $if showAdminInfo
_{MsgUserCreated}
^{formatTimeW SelFormatDateTime userCreated}
_{MsgLastLogin}
$maybe llogin <- userLastAuthentication ^{formatTimeW SelFormatDateTime llogin} $nothing _{MsgNeverSet}
_{MsgProfileLastLdapSynchronisation}
$maybe lsync <- userLastLdapSynchronisation ^{formatTimeW SelFormatDateTime lsync} $nothing _{MsgNeverSet} $maybe pKey <- userLdapPrimaryKey
_{MsgProfileLdapPrimaryKey}
#{pKey}
_{MsgTokensLastReset}
$maybe lastInvalidated <- userTokensIssuedAfter ^{formatTimeW SelFormatDateTime lastInvalidated} $nothing _{MsgNeverSet} $forall (function, schools) <- Map.toList functions
_{function}