module Mail
  class PartsList < Array
    
    def attachments
      Mail::AttachmentsList.new(self)
    end

    def collect
      if block_given?
        ary = PartsList.new
        each { |o| ary << yield(o) }
        ary
      else
        to_a
      end
    end

    alias :collect :map 
    
    def sort!(order)
      sorted = self.sort do |a, b|
        # OK, 10000 is arbitrary... if anyone actually wants to explicitly sort 10000 parts of a
        # single email message... please show me a use case and I'll put more work into this method,
        # in the meantime, it works :)
        a_order = order.index(a[:content_type].string.downcase) || 10000
        b_order = order.index(b[:content_type].string.downcase) || 10000
        a_order <=> b_order
      end
      self.clear
      sorted.each { |p| self << p }
    end
    
  end
end