X-Git-Url: http://gitweb.michael.orlitzky.com/?p=dead%2Fhalcyon.git;a=blobdiff_plain;f=src%2FExitCodes.hs;h=653b1c98c94a0d18f3c044302461d4166ba82f31;hp=11c03f9b67a7e53cff4bfbd2a71a1e7df4971512;hb=7bb00e04c15781d889f950d00babf3f183047bff;hpb=26718edaad5cd7921d957a1f0972fd9f5cd5b645

diff --git a/src/ExitCodes.hs b/src/ExitCodes.hs
index 11c03f9..653b1c9 100644
--- a/src/ExitCodes.hs
+++ b/src/ExitCodes.hs
@@ -1,9 +1,17 @@
 -- |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
+module ExitCodes (
+  exit_args_parse_failed,
+  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