8 files changed, 2 insertions, 38 deletions
diff --git a/app/History.hs b/app/History.hs
index 14724b7..0e7465c 100644
--- a/app/History.hs
+++ b/app/History.hs
@@ -1,7 +1,3 @@
-{-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE OverloadedRecordDot #-}
-{-# LANGUAGE OverloadedStrings #-}
-
 module History (getIssues, listIssues) where
 
 import Control.Exception (Exception, catch, handle, throw)
diff --git a/app/Issue.hs b/app/Issue.hs
index 256947b..f7895af 100644
--- a/app/Issue.hs
+++ b/app/Issue.hs
@@ -1,10 +1,4 @@
-{-# LANGUAGE BlockArguments #-}
-{-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE DisambiguateRecordFields #-}
-{-# LANGUAGE OverloadedRecordDot #-}
-{-# LANGUAGE OverloadedStrings #-}
 {-# OPTIONS_GHC -fno-warn-orphans #-}
-
 module Issue (Issue (..), Provenance (..), fromMatch, id) where
 
 import Data.Binary (Binary, Put, get, put)
diff --git a/app/Issue/Filter.hs b/app/Issue/Filter.hs
index 717fa8d..90b75de 100644
--- a/app/Issue/Filter.hs
+++ b/app/Issue/Filter.hs
@@ -1,7 +1,3 @@
-{-# LANGUAGE OverloadedRecordDot #-}
-{-# LANGUAGE OverloadedStrings #-}
-{-# LANGUAGE ViewPatterns #-}
-
 module Issue.Filter
   ( Filter,
     filterArg,
diff --git a/app/Issue/Tag.hs b/app/Issue/Tag.hs
index 7147cb1..9c0c98f 100644
--- a/app/Issue/Tag.hs
+++ b/app/Issue/Tag.hs
@@ -1,14 +1,9 @@
-{-# LANGUAGE LambdaCase #-}
-{-# LANGUAGE OverloadedStrings #-}
-{-# LANGUAGE ViewPatterns #-}
-{-# LANGUAGE DeriveAnyClass #-}
-
 module Issue.Tag (Tag (..), extractTags, internalTags) where
 
+import Data.Binary (Binary)
 import Data.Maybe (catMaybes)
 import Data.Text (Text)
 import Data.Text qualified as T
-import Data.Binary (Binary)
 import GHC.Generics (Generic)
 
 data Tag = Tag Text Text deriving (Show, Generic, Binary)
diff --git a/app/Issue/Text.hs b/app/Issue/Text.hs
index c8b97d7..7c81c91 100644
--- a/app/Issue/Text.hs
+++ b/app/Issue/Text.hs
@@ -1,6 +1,3 @@
-{-# LANGUAGE OverloadedRecordDot #-}
-{-# LANGUAGE OverloadedStrings #-}
-
 module Issue.Text (extractText) where
 
 import Control.Arrow (second)
diff --git a/app/Main.hs b/app/Main.hs
index 9a88749..1bb5c70 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -1,11 +1,3 @@
-{-# LANGUAGE BlockArguments #-}
-{-# LANGUAGE DuplicateRecordFields #-}
-{-# LANGUAGE ForeignFunctionInterface #-}
-{-# LANGUAGE LambdaCase #-}
-{-# LANGUAGE OverloadedRecordDot #-}
-{-# LANGUAGE OverloadedStrings #-}
-{-# LANGUAGE PartialTypeSignatures #-}
-
 -- TODO Edit issues from command line
 --
 -- I would like to edit issues from the command line.
diff --git a/app/TreeGrepper/FileType.hs b/app/TreeGrepper/FileType.hs
index 843eaf1..1ebeac1 100644
--- a/app/TreeGrepper/FileType.hs
+++ b/app/TreeGrepper/FileType.hs
@@ -1,6 +1,3 @@
-{-# LANGUAGE LambdaCase #-}
-{-# LANGUAGE OverloadedStrings #-}
-
 module TreeGrepper.FileType
   ( FileType (..),
     all,
diff --git a/app/TreeGrepper/Match.hs b/app/TreeGrepper/Match.hs
index 1072fbd..5d9479e 100644
--- a/app/TreeGrepper/Match.hs
+++ b/app/TreeGrepper/Match.hs
@@ -1,6 +1,3 @@
-{-# LANGUAGE OverloadedRecordDot #-}
-{-# LANGUAGE DeriveAnyClass #-}
-
 module TreeGrepper.Match
   ( Match (..),
     Position (..),
@@ -9,6 +6,7 @@ module TreeGrepper.Match
 where
 
 import Data.Aeson (FromJSON)
+import Data.Binary (Binary)
 import Data.Function (on)
 import Data.List (sortBy)
 import Data.List.NonEmpty (NonEmpty ((:|)))
@@ -17,7 +15,6 @@ import Data.Ord (comparing)
 import Data.Text (Text)
 import Data.Text qualified as T
 import GHC.Generics (Generic)
-import Data.Binary (Binary)
 
 data Match = Match
   { kind :: String,