Use time-locale-compat library

This commit is contained in:
Juan Paucar 2015-05-11 08:05:15 -05:00
parent 253c43d239
commit e73ef58f67
2 changed files with 7 additions and 5 deletions

View File

@ -33,7 +33,8 @@ executable hap
main-is: Main.hs main-is: Main.hs
hs-source-dirs: src hs-source-dirs: src
build-depends: base >=4.5 && <4.9 build-depends: base >=4.5 && <4.9
, time ==1.4.* , time-locale-compat
, time
, old-locale , old-locale
, process , process
, either , either
@ -50,8 +51,8 @@ library
other-modules: System.Hapistrano.Types other-modules: System.Hapistrano.Types
build-depends: base >=4.5 && <4.9 build-depends: base >=4.5 && <4.9
, time ==1.4.* , time-locale-compat
, time
, old-locale , old-locale
, process , process
, either , either
@ -70,7 +71,8 @@ test-suite hapistrano-test
main-is: Spec.hs main-is: Spec.hs
build-depends: base >=4.5 && <4.9 build-depends: base >=4.5 && <4.9
, time ==1.4.* , time-locale-compat
, time
, old-locale , old-locale
, process , process
, either , either

View File

@ -39,9 +39,9 @@ import Data.Char (isNumber)
import Data.List (intercalate, sortBy, isInfixOf) import Data.List (intercalate, sortBy, isInfixOf)
import Data.Time (getCurrentTime) import Data.Time (getCurrentTime)
import Data.Time.Format (formatTime) import Data.Time.Format (formatTime)
import Data.Time.Locale.Compat (defaultTimeLocale)
import System.FilePath.Posix (joinPath, splitPath) import System.FilePath.Posix (joinPath, splitPath)
import System.IO (hPutStrLn, stderr) import System.IO (hPutStrLn, stderr)
import System.Locale (defaultTimeLocale)
import System.Process (readProcessWithExitCode) import System.Process (readProcessWithExitCode)
-- | Does basic project setup for a project, including making sure -- | Does basic project setup for a project, including making sure