From eeed0577bef179170d88b97dd27ece638ceb7ec3 Mon Sep 17 00:00:00 2001
From: Robert Hensing <robert@roberthensing.nl>
Date: Fri, 20 Mar 2020 22:19:23 +0100
Subject: [PATCH] haskell: Resolve lines ambiguity

---
 src/haskell/lib/Arion/Images.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/haskell/lib/Arion/Images.hs b/src/haskell/lib/Arion/Images.hs
index a533cec..90f5152 100644
--- a/src/haskell/lib/Arion/Images.hs
+++ b/src/haskell/lib/Arion/Images.hs
@@ -11,10 +11,10 @@ import Protolude hiding (to)
 import qualified Data.Aeson as Aeson
 import           Arion.Aeson (decodeFile)
 import qualified System.Process as Process
+import qualified Data.Text as T
 
 import Control.Lens
 import Data.Aeson.Lens
-import Data.String
 import System.IO (withFile, IOMode(ReadMode))
 
 
@@ -57,4 +57,4 @@ loadImage imgPath = withFile (imgPath) ReadMode $ \fileHandle -> do
 dockerImages :: IO [TaggedImage]
 dockerImages = do
   let procSpec = Process.proc "docker" [ "images",  "--filter", "dangling=false", "--format", "{{.Repository}}:{{.Tag}}" ]
-  (map toS . lines) <$> Process.readCreateProcess procSpec ""
+  (map toS . T.lines . toS) <$> Process.readCreateProcess procSpec ""