   def write_image(data, path) do
     case File.write(path, data) do
       {:error, _} ->
-        {:error, "Failed to Write Image: '#{path}'"}
+        {:error, "failed to write image: '#{path}'"}
 
       :ok -> :ok
     end

  @exec  "convert"

  def identify(input) do
    args =
      [ input,
        "json:"
      ]

    with {json_output,  0} <- System.cmd(@exec, args),
         {:ok, identity} <- Poison.Parser.parse(json_output) do
      {:ok, identity}
    else
      {:error, _} -> {:error, "Failed to parse ImageMagick json"}
      _           -> {:error, "ImageMagick identification Failed"}
    end
  end


        {_, 0} ->
          {:cont, {:ok, Map.put(acc, name, thumb)}}
        _ ->
          {:halt, {:error, "resize of '#{image}' to '#{output}' failed"}}
      end
    end)
  end
