hercules-ci/arion
1
1
Fork 0
mirror of https://github.com/hercules-ci/arion.git synced 2024-11-23 09:38:12 +03:00
Code Issues Projects Releases Wiki Activity

haskell: Resolve lines ambiguity

Browse Source
This commit is contained in:
Robert Hensing 2020-03-20 22:19:23 +01:00
parent 313bf21228
commit eeed0577be
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/haskell/lib/Arion/Images.hs
View File

@ -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 ""