tracePullImage
    :: (Member Trace r, Member (Exception DockerEx) r)
    => Image -> Eff r ()
tracePullImage img =
    trace $ "docker pull " <> T.unpack (imageRepr img)
tracePullImage
    :: (Member Trace r, Member (Exception DockerEx) r)
    => Image -> Eff r ()
tracePullImage img =
    trace $ "docker pull " <> T.unpack (imageRepr img)
tracePullImage img =
    trace $ "docker pull " <> T.unpack (imageRepr img)