Remove unnecessary packages

src/Dodge/Save.hs

@@ -12,7 +12,7 @@ import Dodge.Concurrent
 import Control.Lens
 import Dodge.Data.SaveSlot
 import Data.Aeson
-import qualified Data.Aeson.Encode.Pretty as AEP
+--import qualified Data.Aeson.Encode.Pretty as AEP
 import qualified Data.ByteString.Lazy as BS
 --import qualified Data.ByteString as BSS
 import Dodge.Data.Universe
@@ -25,8 +25,9 @@ writeSaveSlot ss u = do
     putStrLn $ "Saving " ++ saveSlotPath ss
     createDirectoryIfMissing True "saveSlot"
     BS.writeFile (saveSlotPath ss) $
-        AEP.encodePretty'
-            (AEP.Config (AEP.Spaces 2) compare AEP.Generic False)
+        --AEP.encodePretty'
+        --    (AEP.Config (AEP.Spaces 2) compare AEP.Generic False)
+        encode
             (u ^. uvWorld . cWorld)
     return Just