5b47749 · obelisk · git.iko.soy

git.iko.soy/obelisk

Merge pull request #519 from obsidiansystems/eac@clean-up-skeleton

Skeleton: Cleanup/lint

commit5b477491ca39e021de77b5abc48d3cc0c433daf1 authorAli Abrar <aliabrar@gmail.com> dateWed 2 Oct 2019, 12:12 (7 years ago) parent00e56b2 7f49490

3 files changed+5−9

unifiedsplit

skeleton/backend/src/Backend.hs−2

@@ -1,6 +1,4 @@

1−{-# LANGUAGE EmptyCase #-}

21{-# LANGUAGE FlexibleContexts #-}

3−{-# LANGUAGE LambdaCase #-}

42{-# LANGUAGE RankNTypes #-}

53{-# LANGUAGE TypeFamilies #-}

64module Backend where

skeleton/common/src/Common/Route.hs+4−6

@@ -1,15 +1,13 @@

11{-# LANGUAGE EmptyCase #-}

22{-# LANGUAGE FlexibleContexts #-}

3+{-# LANGUAGE FlexibleInstances #-}

34{-# LANGUAGE GADTs #-}

4−{-# LANGUAGE LambdaCase #-}

5−{-# LANGUAGE RankNTypes #-}

6−{-# LANGUAGE TemplateHaskell #-}

75{-# LANGUAGE KindSignatures #-}

8−{-# LANGUAGE EmptyCase #-}

6+{-# LANGUAGE LambdaCase #-}

97{-# LANGUAGE MultiParamTypeClasses #-}

10−{-# LANGUAGE FlexibleInstances #-}

118{-# LANGUAGE OverloadedStrings #-}

12−

9+{-# LANGUAGE RankNTypes #-}

10+{-# LANGUAGE TemplateHaskell #-}

1311module Common.Route where

1412

1513{- -- You will probably want these imports for composing Encoders.

skeleton/frontend/src/Frontend.hs+1−1

@@ -22,7 +22,7 @@ frontend = Frontend

2222 el "p" $ text $ T.pack commonStuff

2323 elAttr "img" ("src" =: static @"obelisk.jpg") blank

2424 el "div" $ do

25− exampleConfig <- getConfig "common/example"

25+ exampleConfig <- getConfig "common/example"

2626 case exampleConfig of

2727 Nothing -> text "No config file found in config/common/example"

2828 Just s -> text (T.decodeUtf8 s)