code: def list(kind=:bullets)
          node = ListNode.new(self)
          yield node.list(kind)
          self.store(node)
        end
docs: This method provides a short cut means of creating a new ordered or
   unordered list. The method requires a block that will be passed a
   single parameter that'll be a reference to the first level of the
   list. See the +ListLevelNode+ doc for more information.
  
   Example usage:
  
     rtf.list do |level1|
       level1.item do |li|
         li << 'some text'
         li.apply(some_style) {|x| x << 'some styled text'}
       end
  
       level1.list(:decimal) do |level2|
         level2.item {|li| li << 'some other text in a decimal list'}
         level2.item {|li| li << 'and here we go'}
       end
     end