@@ -11,6 +11,7 @@ import Text.Email.Validate
11import Data.Char
11import Data.Char
12import Data.Maybe
12import Data.Maybe
13import Data.Time
13import Data.Time
14+import Control.Applicative
14#if MIN_VERSION_time(1,5,0)
15#if MIN_VERSION_time(1,5,0)
15import Data.Time.Format (TimeLocale, defaultTimeLocale)
16import Data.Time.Format (TimeLocale, defaultTimeLocale)