Simplify the language ext.

package.yaml

@@ -52,8 +52,12 @@ dependencies:
 - warp
 
 default-extensions:
+- DataKinds
+- DerivingStrategies
+- DeriveAnyClass
 - NoImplicitPrelude
 - OverloadedStrings
+- TypeFamilies
 - TypeOperators
 
 library:

src/Conduit.hs

@@ -1,11 +1,5 @@
 {-# LANGUAGE CPP #-}
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE FlexibleContexts #-}
 {-# LANGUAGE ScopedTypeVariables #-}
-{-# LANGUAGE TypeApplications #-}
-{-# LANGUAGE TypeFamilies #-}
-{-# LANGUAGE TypeOperators #-}
 {-# LANGUAGE UnicodeSyntax #-}
 
 module Conduit where

src/Conduit/Api.hs

@@ -1,7 +1,3 @@
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE TypeOperators #-}
-
 module Conduit.Api where
 
 import Conduit.Api.Article

src/Conduit/Api/Article.hs

@@ -1,9 +1,3 @@
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE LambdaCase #-}
-{-# LANGUAGE RankNTypes #-}
-{-# LANGUAGE TypeOperators #-}
-
 module Conduit.Api.Article where
 
 import Conduit.Api.Common

src/Conduit/Api/Auth.hs

@@ -1,7 +1,3 @@
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE TypeOperators #-}
-
 module Conduit.Api.Auth where
 
 import Conduit.Api.Common

src/Conduit/Api/Comment.hs

@@ -1,8 +1,3 @@
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE LambdaCase #-}
-{-# LANGUAGE TypeOperators #-}
-
 module Conduit.Api.Comment where
 
 import Conduit.Api.Common

src/Conduit/Api/Common.hs

@@ -1,5 +1,3 @@
-{-# LANGUAGE DeriveGeneric #-}
-
 module Conduit.Api.Common where
 
 import Conduit.Core.User

src/Conduit/Api/Profile.hs

@@ -1,6 +1,3 @@
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE TypeOperators #-}
-
 module Conduit.Api.Profile where
 
 import Conduit.Api.Common

src/Conduit/Api/Tag.hs

@@ -1,8 +1,3 @@
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE GeneralizedNewtypeDeriving #-}
-{-# LANGUAGE TypeOperators #-}
-
 module Conduit.Api.Tag where
 
 import Conduit.App

src/Conduit/Api/User.hs

@@ -1,7 +1,3 @@
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE TypeOperators #-}
-
 module Conduit.Api.User where
 
 import Conduit.Api.Common

src/Conduit/App.hs

@@ -1,5 +1,4 @@
 {-# LANGUAGE CPP #-}
-{-# LANGUAGE FlexibleContexts #-}
 {-# LANGUAGE ScopedTypeVariables #-}
 {-# LANGUAGE UnicodeSyntax #-}
 

src/Conduit/Auth.hs

@@ -1,7 +1,3 @@
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE OverloadedStrings #-}
-{-# LANGUAGE TypeFamilies #-}
-
 module Conduit.Auth where
 
 import Conduit.App (AppEnv (envJwtKey))

src/Conduit/Config.hs

@@ -1,5 +1,3 @@
-{-# LANGUAGE DeriveGeneric #-}
-
 module Conduit.Config where
 
 import Conduit.Util (exitWithErrorMessage)

src/Conduit/Core/Article.hs

@@ -1,4 +1,3 @@
-{-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE GeneralizedNewtypeDeriving #-}
 
 module Conduit.Core.Article where

src/Conduit/Core/Comment.hs

@@ -1,4 +1,3 @@
-{-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE GeneralizedNewtypeDeriving #-}
 
 module Conduit.Core.Comment where

src/Conduit/Core/Password.hs

@@ -1,4 +1,3 @@
-{-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE GeneralizedNewtypeDeriving #-}
 
 module Conduit.Core.Password where

src/Conduit/Core/User.hs

@@ -1,8 +1,4 @@
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE GeneralizedNewtypeDeriving #-}
-{-# LANGUAGE TypeFamilies #-}
 
 module Conduit.Core.User where
 

src/Conduit/Db/Schema/Article.hs

@@ -1,9 +1,5 @@
-{-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE DuplicateRecordFields #-}
 {-# LANGUAGE StandaloneDeriving #-}
-{-# LANGUAGE TypeFamilies #-}
 
 module Conduit.Db.Schema.Article where
 

src/Conduit/Db/Schema/ArticleTag.hs

@@ -1,9 +1,5 @@
-{-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE DuplicateRecordFields #-}
 {-# LANGUAGE StandaloneDeriving #-}
-{-# LANGUAGE TypeFamilies #-}
 
 module Conduit.Db.Schema.ArticleTag where
 

src/Conduit/Db/Schema/Comment.hs

@@ -1,9 +1,5 @@
-{-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE DuplicateRecordFields #-}
 {-# LANGUAGE StandaloneDeriving #-}
-{-# LANGUAGE TypeFamilies #-}
 
 module Conduit.Db.Schema.Comment where
 

src/Conduit/Db/Schema/Favorite.hs

@@ -1,9 +1,5 @@
-{-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE DuplicateRecordFields #-}
 {-# LANGUAGE StandaloneDeriving #-}
-{-# LANGUAGE TypeFamilies #-}
 
 module Conduit.Db.Schema.Favorite where
 

src/Conduit/Db/Schema/Tag.hs

@@ -1,9 +1,5 @@
-{-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE DuplicateRecordFields #-}
 {-# LANGUAGE StandaloneDeriving #-}
-{-# LANGUAGE TypeFamilies #-}
 
 module Conduit.Db.Schema.Tag where
 

src/Conduit/Db/Schema/User.hs

@@ -1,11 +1,5 @@
-{-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE DuplicateRecordFields #-}
-{-# LANGUAGE GeneralizedNewtypeDeriving #-}
-{-# LANGUAGE LambdaCase #-}
 {-# LANGUAGE StandaloneDeriving #-}
-{-# LANGUAGE TypeFamilies #-}
 
 module Conduit.Db.Schema.User where
 

src/Conduit/Db/Schema/UserFollow.hs

@@ -1,9 +1,5 @@
-{-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE DuplicateRecordFields #-}
 {-# LANGUAGE StandaloneDeriving #-}
-{-# LANGUAGE TypeFamilies #-}
 
 module Conduit.Db.Schema.UserFollow where
 

src/Conduit/Db/Transaction.hs

@@ -1,5 +1,3 @@
-{-# LANGUAGE RankNTypes #-}
-
 module Conduit.Db.Transaction where
 
 import Conduit.App

src/Conduit/Environment.hs

@@ -1,5 +1,3 @@
-{-# LANGUAGE RankNTypes #-}
-
 module Conduit.Environment where
 
 import Crypto.JOSE (JWK)

src/Conduit/Repository/Article.hs

@@ -1,7 +1,4 @@
 {-# LANGUAGE DuplicateRecordFields #-}
-{-# LANGUAGE LambdaCase #-}
-{-# LANGUAGE RankNTypes #-}
-{-# LANGUAGE TypeFamilies #-}
 
 module Conduit.Repository.Article where
 

src/Conduit/Repository/Comment.hs

@@ -1,5 +1,3 @@
-{-# LANGUAGE RankNTypes #-}
-
 module Conduit.Repository.Comment where
 
 import Conduit.App

src/Conduit/Repository/User.hs

@@ -1,6 +1,4 @@
 {-# LANGUAGE DuplicateRecordFields #-}
-{-# LANGUAGE LambdaCase #-}
-{-# LANGUAGE RankNTypes #-}
 
 module Conduit.Repository.User where
 

src/Conduit/Util.hs

@@ -1,5 +1,3 @@
-{-# LANGUAGE RankNTypes #-}
-
 module Conduit.Util where
 
 import Control.Monad.Trans.Maybe (MaybeT (..))

test/Test/Conduit/Api/AuthApiSpec.hs

@@ -1,5 +1,3 @@
-{-# LANGUAGE RankNTypes #-}
-
 module Test.Conduit.Api.AuthApiSpec where
 
 import Conduit.Api.Auth

test/Test/Conduit/TestHelper.hs

@@ -1,5 +1,3 @@
-{-# LANGUAGE RankNTypes #-}
-
 module Test.Conduit.TestHelper where
 
 import Conduit