diff --git a/src/Console.hs b/src/Console.hs index 3e86076..b35705e 100644 --- a/src/Console.hs +++ b/src/Console.hs @@ -2,16 +2,17 @@ module Console where -import Control.Applicative (empty) import qualified Data.ByteString.Base64.Lazy as B64 import qualified Data.ByteString.Builder as B -import Data.ByteString.Lazy (ByteString) import qualified Data.ByteString.Lazy.Char8 as BS8 -import Data.List (isPrefixOf) import qualified Data.Map.Strict as M +import qualified System.Environment as Env + +import Control.Applicative (empty) +import Data.ByteString.Lazy (ByteString) +import Data.List (isPrefixOf) import Data.Maybe (catMaybes) import Data.Monoid ((<>)) -import qualified System.Environment as Env data ConsoleImage = ConsoleImage { ciInline :: !Bool diff --git a/test/Spec.hs b/test/Spec.hs index 05d5f24..1b4e50c 100644 --- a/test/Spec.hs +++ b/test/Spec.hs @@ -1,10 +1,11 @@ {-# LANGUAGE OverloadedStrings #-} -import Test.Hspec import qualified Console as C +import qualified Data.ByteString.Builder as B import qualified Data.Map.Strict as M import qualified Data.Set as S -import qualified Data.ByteString.Builder as B + +import Test.Hspec main :: IO () main = hspec $ do