def write_a_gs_lst(gradient)
      positions = gradient[:positions]
      colors    = gradient[:colors]

      @writer.tag_elements('a:gsLst') do
        (0..colors.size-1).each do |i|
          pos = (positions[i] * 1000).to_i

          attributes = [ ['pos', pos] ]
          @writer.tag_elements('a:gs', attributes) do

            color = color(colors[i])

            # Write the a:srgbClr element.
            # TODO: Wait for a feature request to support transparency.
            write_a_srgb_clr( color );
          end
        end
      end
    end
def write_a_gs_lst(gradient)
      positions = gradient[:positions]
      colors    = gradient[:colors]

      @writer.tag_elements('a:gsLst') do
        (0..colors.size-1).each do |i|
          pos = (positions[i] * 1000).to_i

          attributes = [ ['pos', pos] ]
          @writer.tag_elements('a:gs', attributes) do

            color = color(colors[i])

            # Write the a:srgbClr element.
            # TODO: Wait for a feature request to support transparency.
            write_a_srgb_clr( color );
          end
        end
      end
    end
Write the <a:gsLst> element.