mlist 0.1.9 → 0.1.10

data/VERSION.yml

@@ -1,4 +1,5 @@
 --- 
-:patch: 9
+:patch: 10
 :major: 0
+:build: 
 :minor: 1

data/lib/mlist/email.rb

@@ -6,10 +6,6 @@ module MList
     include MList::Util::EmailHelpers
     include MList::Util::TMailReaders
     
-    def been_here?(list)
-      tmail.header_string('x-beenthere') == list.address
-    end
-    
     def date
       if date_from_email = super
         return date_from_email
@@ -22,6 +18,12 @@ module MList
       tmail.header_string('from')
     end
     
+    # Answers the values of all the X-BeenThere headers.
+    #
+    def been_there_addresses
+      Array(tmail['x-beenthere']).collect { |e| e.body.downcase }.uniq
+    end
+    
     # Answers the usable destination addresses of the email.
     #
     def list_addresses

data/lib/mlist/list.rb

@@ -17,6 +17,14 @@ module MList
       true
     end
     
+    # Answers whether the email has been to this list before. The simplest
+    # test is whether the email has an X-BeenThere header that matches this
+    # list's address.
+    #
+    def been_here?(email)
+      email.been_there_addresses.include?(address)
+    end
+    
     # Answers whether the subscriber is blocked from posting or not. This will
     # not be asked when the list is not active (answers _active?_ as false).
     #

data/lib/mlist/server.rb

@@ -27,7 +27,7 @@ module MList
     protected
       def process_post(lists, email)
         lists.each do |list|
-          next if email.been_here?(list)
+          next if list.been_here?(email)
           if list.subscriber?(email.from_address)
             publish_if_list_active(list, email)
           else

data/spec/integration/mlist_spec.rb

@@ -90,6 +90,7 @@ describe MList do
   end
   
   it 'should not forward mail that has been on this server before' do
+    # The sample email has multiple headers to prove that's not a problem
     @email_server.should_not forward_email(tmail_fixture('x-beenthere'))
   end
   

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: mlist
 version: !ruby/object:Gem::Version 
-  version: 0.1.9
+  version: 0.1.10
 platform: ruby
 authors: 
 - Adam Williams
@@ -9,7 +9,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2009-12-21 00:00:00 -05:00
+date: 2010-01-11 00:00:00 -05:00
 default_executable: 
 dependencies: []