module MList
  module EmailServer
    class Base
      def initialize
        @receivers = []
      end
      
      def deliver(email)
        raise 'Implement actual delivery mechanism in subclasses'
      end
      
      def receive(tmail)
        email = EmailServer::Email.new(tmail)
        @receivers.each { |r| r.receive(email) }
      end
      
      def receiver(rx)
        @receivers << rx
      end
    end
  end
end