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

chore(email): set name for pdf file attachment

Browse Source
This commit is contained in:
Steffen Jost 2022-07-28 16:58:52 +02:00
parent 1a67063ec3
commit 7a532e9778
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/Jobs/Handler/SendNotification/Qualification.hs
View File

@ -74,10 +74,10 @@ dispatchNotificationQualificationRenewal nQualification jRecipient = do
$logErrorS "LMS" msg $logErrorS "LMS" msg
error $ unpack msg error $ unpack msg
Right pdffile -> do Right pdffile -> do
addPart (File { fileTitle = "Renewal Pin Letter" addPart (File { fileTitle = "RenewalPinLetter.pdf" -- TODO: better file title!
, fileModified = now , fileModified = now
, fileContent = Just $ yield $ LBS.toStrict pdffile , fileContent = Just $ yield $ LBS.toStrict pdffile
} :: PureFile) } :: PureFile)
-- TODO: this is just a dummy to continue while i18nHamletFile usage is unclear -- TODO: this is just a dummy to continue while i18nHamletFile usage is unclear
addHtmlMarkdownAlternatives $(ihamletFile "templates/mail/qualificationRenewal.hamlet") addHtmlMarkdownAlternatives $(ihamletFile "templates/mail/qualificationRenewal.hamlet")