def process_text_list_style( element )
      marker = ["circle", "disc", "square"];
      numbering = {"1" => "decimal",
        "a" => "lower-alpha", "A" => "upper-alpha",
        "i" => "lower-roman", "I" => "upper-roman" }

      main_name = element.attribute( "#{@style_ns}:name" ).value
      element.elements.each do |child|
        level = child.attribute("#{@text_ns}:level").value
        selector = main_name + "_" + level

        if (child.name == "list-level-style-bullet")
          process_normal_style_attr( selector, "list-style-type",
            marker[(level.to_i-1)%3] )
        elsif (child.name == "list-level-style-number")
          process_normal_style_attr( selector, "list-style-type",
            numbering[child.attribute("#{@style_ns}:num-format").value] )
        end
      end
    end
def process_text_list_style( element )
      marker = ["circle", "disc", "square"];
      numbering = {"1" => "decimal",
        "a" => "lower-alpha", "A" => "upper-alpha",
        "i" => "lower-roman", "I" => "upper-roman" }

      main_name = element.attribute( "#{@style_ns}:name" ).value
      element.elements.each do |child|
        level = child.attribute("#{@text_ns}:level").value
        selector = main_name + "_" + level

        if (child.name == "list-level-style-bullet")
          process_normal_style_attr( selector, "list-style-type",
            marker[(level.to_i-1)%3] )
        elsif (child.name == "list-level-style-number")
          process_normal_style_attr( selector, "list-style-type",
            numbering[child.attribute("#{@style_ns}:num-format").value] )
        end
      end
    end
Create styles for each level of a <tt>&lt;text:list-style&gt;</tt>
 element. For bulleted lists, it sets the bullet type by indexing
 into the <tt>marker</tt> array; for numbered lists, it uses the
 <tt>numbering</tt> hash to translate OpenDocument's
 <tt>style:num-format</tt> to the corresponding CSS
 <tt>list-style-type</tt>.