]> gitweb.michael.orlitzky.com - dead/halcyon.git/blobdiff - src/ExitCodes.hs
Clean up imports.
[dead/halcyon.git] / src / ExitCodes.hs
index 653b1c98c94a0d18f3c044302461d4166ba82f31..7597a54723e0fa28d466f195f5161e60698ea3c4 100644 (file)
@@ -1,17 +1,9 @@
--- |All exit codes that the program can return (excepting
--- ExitSuccess). There's only one, since the program will try and fail
--- forever upon errors.
-module ExitCodes (
-  exit_args_parse_failed,
-  exit_no_usernames
-  )
+-- | All exit codes that the program can return (excepting
+--   ExitSuccess).
+module ExitCodes ( exit_no_usernames )
 where
 
--- |Indicates that the command-line arguments could not be parsed.
-exit_args_parse_failed :: Int
-exit_args_parse_failed = 1
-
 -- | No usernames found on either the command-line or in a config
 --   file.
 exit_no_usernames :: Int
-exit_no_usernames = 2
+exit_no_usernames = 1