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

Fix build

Browse Source
This commit is contained in:
Gregor Kleen 2018-06-07 11:36:59 +02:00 committed by Felix Hamann
parent f4b6d1e3f5
commit 18c3840276
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/Foundation.hs
View File

@ -1,7 +1,7 @@
{-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE OverloadedLists #-} {-# LANGUAGE OverloadedLists #-}
{-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE TemplateHaskell, QuasiQuotes #-}
{-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE TypeFamilies #-} {-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE ViewPatterns #-} {-# LANGUAGE ViewPatterns #-}
@ -687,7 +687,7 @@ pageActions (TermCourseListR _) =
pageActions _ = [] pageActions _ = []
pageHeading :: Route UniWorx -> Maybe Widget pageHeading :: Route UniWorX -> Maybe Widget
pageHeading HomeR pageHeading HomeR
= Just [whamlet|_{MsgHomeHeading}|] = Just [whamlet|_{MsgHomeHeading}|]
pageHeading _ pageHeading _