fraport/fradrive
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

chore(letter): fix wording in expiry letter

Browse Source
This commit is contained in:
Steffen Jost 2023-05-10 09:39:34 +00:00
parent ecd6095dc9
commit 4d432305a7
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/Utils/Print/ExpireQualification.hs
View File

@ -65,14 +65,14 @@ instance MDLetter LetterExpireQualificationF where
let isSupervised = rcvrId /= leqfHolderID
in mkMeta $
guardMonoid isSupervised
[ toMeta "supervisor" userDisplayName
, toMeta "de-opening" ("Sehr geehrte Damen und Herren,"::Text)
, toMeta "en-opening" ("Dear Sir or Madam,"::Text)
[ toMeta "supervisor" userDisplayName
] <>
[ toMeta "lang" lang
, toMeta "licenceholder" leqfHolderDN
, mbMeta "expiry" (format SelFormatDate <$> leqfExpiry)
, mbMeta "licence-url" leqfUrl
, toMeta "de-opening" $ bool ("Guten Tag " <> leqfHolderDN <> ",") "Sehr geehrte Damen und Herren," isSupervised
, toMeta "en-opening" $ bool ("Dear " <> leqfHolderDN <> ",") "Dear supervisor," isSupervised
]
getPJId LetterExpireQualificationF{..} =

4
templates/letter/fraport_f_expiry.md
View File

@ -84,7 +84,7 @@ Hierfür wenden Sie sich bitte an die Fahrerausbildung der Fraport AG unter:
Telefon
: $phone$
: [$phone$](tel:$phone$)
Email
@ -133,7 +133,7 @@ Please contact the Fraport driving school team, if you want to book a course:
Phone
: $phone$
: [$phone$](tel:$phone$)
Email