X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FExitCodes.hs;h=acb725274a993fe7c882bc5dda329c8e0c084f8b;hb=1cecab83b93656aa08ef5128b4e3bd3b6385ac8d;hp=7371e86326ff3b66eabd52c4c654bd7508df5189;hpb=9d278c8b8eeff1a1317f2c3b0f7fdf5fb759ffb3;p=dead%2Fhtsn-import.git

diff --git a/src/ExitCodes.hs b/src/ExitCodes.hs
index 7371e86..acb7252 100644
--- a/src/ExitCodes.hs
+++ b/src/ExitCodes.hs
@@ -2,16 +2,10 @@
 --   ExitSuccess).
 --
 module ExitCodes (
-  exit_no_connection_string,
   exit_no_xml_files )
 where
 
--- | No connection string was given on the command line or in the
---   config file.
-exit_no_connection_string :: Int
-exit_no_connection_string = 1
-
 -- | No XML files were given on the command line.
 exit_no_xml_files :: Int
-exit_no_xml_files = 2
+exit_no_xml_files = 1