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

Fix typo

Browse Source
This commit is contained in:
Gregor Kleen 2019-05-05 18:42:29 +02:00
parent b430eba9da
commit b34a8467ed
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Handler/Utils/Form/Occurences.hs
View File

@ -110,7 +110,7 @@ occurencesAForm (toPathPiece -> miIdent') mPrev = wFormToAForm $ do
miCell' :: OccurenceException -> Widget miCell' :: OccurenceException -> Widget
miCell' ExceptOccur{..} = do miCell' ExceptOccur{..} = do
exceptStart' <- formatTime SelFormatDateTime (LocalTime exceptDay exceptStart) exceptStart' <- formatTime SelFormatDateTime (LocalTime exceptDay exceptStart)
exceptEnd' <- formatTime SelFormatTime exceptStart exceptEnd' <- formatTime SelFormatTime exceptEnd
$(widgetFile "widgets/occurence/form/except-occur") $(widgetFile "widgets/occurence/form/except-occur")
miCell' ExceptNoOccur{..} = do miCell' ExceptNoOccur{..} = do
exceptTime' <- formatTime SelFormatDateTime exceptTime exceptTime' <- formatTime SelFormatDateTime exceptTime