Hlint

haskell · Nov 20, 2024 · 119c300 · 119c300
1 parent 042fadb
commit 119c300
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/GHCup/Types/JSON.hs b/lib/GHCup/Types/JSON.hs
@@ -50,7 +50,7 @@ import qualified Text.Megaparsec               as MP
 import qualified Text.Megaparsec.Char          as MPC
 
 instance ToJSON LinuxDistro where
-  toJSON x = String . T.pack . show $ x
+  toJSON = String . T.pack . show
 
 instance FromJSON LinuxDistro where
   parseJSON = withText "LinuxDistro" $ \t -> case T.unpack (T.toLower t) of