Fix pgt Main to exit with the correct edit code

mbj · Nov 9, 2023 · ec341fa · ec341fa
1 parent 15cf194
commit ec341fa
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/pgt/app/Main.hs b/pgt/app/Main.hs
@@ -4,7 +4,8 @@ import PGT.Prelude
 import System.Environment (getArgs)
 
 import qualified PGT.CLI
+import qualified System.Exit as System
 
 -- | Main entry point
 main :: IO ()
-main = PGT.CLI.run =<< getArgs
+main = System.exitWith =<< PGT.CLI.run =<< getArgs