X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FExitCodes.hs;h=acb725274a993fe7c882bc5dda329c8e0c084f8b;hb=cdd0f36ab4aa8aadc416f6b9cbe6117c26d2ddf2;hp=7371e86326ff3b66eabd52c4c654bd7508df5189;hpb=ce611b60b9c42e176b215453f0d0f862d2d5d0fd;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