docker
    :: (Member Proc r)
    => Text -- ^ Subcommand
    -> [Text] -- ^ Arguments.
    -> Eff r (ExitCode, Stdout, Stderr)
docker cmd args = proc "docker" (cmd:args) (Stdin BS.empty)
docker
    :: (Member Proc r)
    => Text -- ^ Subcommand
    -> [Text] -- ^ Arguments.
    -> Eff r (ExitCode, Stdout, Stderr)
docker cmd args = proc "docker" (cmd:args) (Stdin BS.empty)
docker cmd args = proc "docker" (cmd:args) (Stdin BS.empty)