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

fix(print): apcidents somehow include newlines after DB update; strip these

Browse Source
This commit is contained in:
Steffen Jost 2024-11-18 12:36:05 +01:00
parent 0b70036a02
commit 9a281f040e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Handler/PrintCenter.hs
View File

@ -28,7 +28,7 @@ import Database.Esqueleto.Utils.TH
import Utils.Print import Utils.Print
import qualified Data.Aeson as Aeson import qualified Data.Aeson as Aeson
-- import qualified Data.Text as Text import qualified Data.Text as Text
-- import qualified Data.Set as Set -- import qualified Data.Set as Set
import Handler.Utils import Handler.Utils
@ -456,7 +456,7 @@ postPrintAckR ackDay numAck chksm = do
-- | otherwise = pure "ERROR" -- | otherwise = pure "ERROR"
saveApcident :: UTCTime -> Natural -> Text -> JobDB Natural saveApcident :: UTCTime -> Natural -> Text -> JobDB Natural
saveApcident t i apci = insert_ (PrintAcknowledge apci t False) >> return (succ i) saveApcident t i apci = insert_ (PrintAcknowledge (Text.strip apci) t False) >> return (succ i)
makeAckUploadForm :: Form FileInfo makeAckUploadForm :: Form FileInfo