@@ -27,7 +27,8 @@ import Control.Concurrent
27import qualified Data.Set as S
27import qualified Data.Set as S
28import Data.Text hiding (map)
28import Data.Text hiding (map)
29import qualified Data.Text as T
29import qualified Data.Text as T
30−import Data.Time.Clock.POSIX
30+import Data.Time.Clock.POSIX hiding (getCurrentTime)
31+import Data.Time.Clock (getCurrentTime)
32main :: IO ()
33main :: IO ()