Silo tested classes away from each other. Kind of ugly, but...

spec/texticle_spec.rb

@@ -3,13 +3,21 @@
 
 class TexticleTest < Test::Unit::TestCase
   context "after extending ActiveRecord::Base" do
-    # before(:all)
-    ActiveRecord::Base.extend(Texticle)
-    class NotThere < ActiveRecord::Base; end
+
+    # set up modules so that Texticle won't be forever mixed into ActiveRecord
+    class ARStandIn < ActiveRecord::Base;
+      self.abstract_class = true
+      extend Texticle
+    end
+    class NotThere < ARStandIn; end
+    class TexticleWebComic < ARStandIn;
+      has_many :characters, :foreign_key => :web_comic_id
+      self.table_name = :web_comics
+    end
 
     should "not break #respond_to?" do
       assert_nothing_raised do
-        ActiveRecord::Base.respond_to? :abstract_class?
+        ARStandIn.respond_to? :abstract_class?
       end
     end
 
@@ -21,9 +29,9 @@ class NotThere < ActiveRecord::Base; end
     end
 
     should "not break #method_missing" do
-      assert_raise(NoMethodError) { ActiveRecord::Base.random }
+      assert_raise(NoMethodError) { ARStandIn.random }
       begin
-        ActiveRecord::Base.random
+        ARStandIn.random
       rescue NoMethodError => error
         assert_match error.message, /undefined method `random'/
       end
@@ -41,9 +49,9 @@ class NotThere < ActiveRecord::Base; end
 
     context "when finding models based on searching a related model" do
       setup do
-        @qc = WebComic.create :name => "Questionable Content", :author => "Jeph Jaques"
-        @jw = WebComic.create :name => "Johnny Wander", :author => "Ananth & Yuko"
-        @pa = WebComic.create :name => "Penny Arcade", :author => "Tycho & Gabe"
+        @qc = TexticleWebComic.create :name => "Questionable Content", :author => "Jeph Jaques"
+        @jw = TexticleWebComic.create :name => "Johnny Wander", :author => "Ananth & Yuko"
+        @pa = TexticleWebComic.create :name => "Penny Arcade", :author => "Tycho & Gabe"
 
         @gabe = @pa.characters.create :name => 'Gabe', :description => 'the simple one'
         @tycho = @pa.characters.create :name => 'Tycho', :description => 'the wordy one'
@@ -60,166 +68,175 @@ class NotThere < ActiveRecord::Base; end
       end
 
       teardown do
-        WebComic.delete_all
+        TexticleWebComic.delete_all
         Character.delete_all
       end
 
       should "look in the related model with nested searching syntax" do
-        assert_equal [@jw], WebComic.joins(:characters).advanced_search(:characters => {:description => 'tall'})
-        assert_equal [@pa, @jw, @qc].sort, WebComic.joins(:characters).advanced_search(:characters => {:description => 'anger'}).sort
-        assert_equal [@pa, @qc].sort, WebComic.joins(:characters).advanced_search(:characters => {:description => 'crude'}).sort
+        assert_equal [@jw], TexticleWebComic.joins(:characters).advanced_search(:characters => {:description => 'tall'})
+        assert_equal [@pa, @jw, @qc].sort, TexticleWebComic.joins(:characters).advanced_search(:characters => {:description => 'anger'}).sort
+        assert_equal [@pa, @qc].sort, TexticleWebComic.joins(:characters).advanced_search(:characters => {:description => 'crude'}).sort
       end
     end
   end
 
   context "after extending an ActiveRecord::Base subclass" do
+    class GameExtendedWithTexticle < Game
+      extend Texticle
+    end
+
+    class GameFailExtendedWithTexticle < GameFail
+      extend Texticle
+    end
+
     setup do
-      @zelda = Game.create :system => "NES",     :title => "Legend of Zelda",    :description => "A Link to the Past."
-      @mario = Game.create :system => "NES",     :title => "Super Mario Bros.",  :description => "The original platformer."
-      @sonic = Game.create :system => "Genesis", :title => "Sonic the Hedgehog", :description => "Spiky."
-      @dkong = Game.create :system => "SNES",    :title => "Diddy's Kong Quest", :description => "Donkey Kong Country 2"
-      @megam = Game.create :system => nil,       :title => "Mega Man",           :description => "Beware Dr. Brain"
-      @sfnes = Game.create :system => "SNES",    :title => "Street Fighter 2",   :description => "Yoga Flame!"
-      @sfgen = Game.create :system => "Genesis", :title => "Street Fighter 2",   :description => "Yoga Flame!"
-      @takun = Game.create :system => "Saturn",  :title => "Magical Tarurūto-kun", :description => "カッコイイ！"
+      @zelda = GameExtendedWithTexticle.create :system => "NES",     :title => "Legend of Zelda",    :description => "A Link to the Past."
+      @mario = GameExtendedWithTexticle.create :system => "NES",     :title => "Super Mario Bros.",  :description => "The original platformer."
+      @sonic = GameExtendedWithTexticle.create :system => "Genesis", :title => "Sonic the Hedgehog", :description => "Spiky."
+      @dkong = GameExtendedWithTexticle.create :system => "SNES",    :title => "Diddy's Kong Quest", :description => "Donkey Kong Country 2"
+      @megam = GameExtendedWithTexticle.create :system => nil,       :title => "Mega Man",           :description => "Beware Dr. Brain"
+      @sfnes = GameExtendedWithTexticle.create :system => "SNES",    :title => "Street Fighter 2",   :description => "Yoga Flame!"
+      @sfgen = GameExtendedWithTexticle.create :system => "Genesis", :title => "Street Fighter 2",   :description => "Yoga Flame!"
+      @takun = GameExtendedWithTexticle.create :system => "Saturn",  :title => "Magical Tarurūto-kun", :description => "カッコイイ！"
     end
 
     teardown do
-      Game.delete_all
+      GameExtendedWithTexticle.delete_all
     end
 
     should "not break respond_to? when connection is unavailable" do
-      GameFail.establish_connection({:adapter => :postgresql, :database =>'unavailable', :username=>'bad', :pool=>5, :timeout=>5000}) rescue nil
+      GameFailExtendedWithTexticle.establish_connection({:adapter => :postgresql, :database =>'unavailable', :username=>'bad', :pool=>5, :timeout=>5000}) rescue nil
 
       assert_nothing_raised do
-        GameFail.respond_to?(:advanced_search)
+        GameFailExtendedWithTexticle.respond_to?(:advanced_search)
       end
-
     end
 
     should "define a #search method" do
-      assert Game.respond_to?(:search)
+      assert GameExtendedWithTexticle.respond_to?(:search)
     end
 
     context "when searching with a String argument" do
       should "search across all :string columns if no indexes have been specified" do
-        assert_equal [@mario], Game.advanced_search("Mario")
-        assert_equal Set.new([@mario, @zelda]), Game.advanced_search("NES").to_set
+        assert_equal [@mario], GameExtendedWithTexticle.advanced_search("Mario")
+        assert_equal Set.new([@mario, @zelda]), GameExtendedWithTexticle.advanced_search("NES").to_set
       end
 
       should "work if the query contains an apostrophe" do
-        assert_equal [@dkong], Game.advanced_search("Diddy's")
+        assert_equal [@dkong], GameExtendedWithTexticle.advanced_search("Diddy's")
       end
 
       should "work if the query contains whitespace" do
-        assert_equal [@megam], Game.advanced_search("Mega Man")
+        assert_equal [@megam], GameExtendedWithTexticle.advanced_search("Mega Man")
       end
 
       should "work if the query contains an accent" do
-        assert_equal [@takun], Game.advanced_search("Tarurūto-kun")
+        assert_equal [@takun], GameExtendedWithTexticle.advanced_search("Tarurūto-kun")
       end
 
       should "search across records with NULL values" do
-        assert_equal [@megam], Game.advanced_search("Mega")
+        assert_equal [@megam], GameExtendedWithTexticle.advanced_search("Mega")
       end
 
       should "scope consecutively" do
-        assert_equal [@sfgen], Game.advanced_search("Genesis").advanced_search("Street Fighter")
+        assert_equal [@sfgen], GameExtendedWithTexticle.advanced_search("Genesis").advanced_search("Street Fighter")
       end
     end
 
     context "when searching with a Hash argument" do
       should "search across the given columns" do
-        assert_empty Game.advanced_search(:title => "NES")
-        assert_empty Game.advanced_search(:system => "Mario")
-        assert_empty Game.advanced_search(:system => "NES", :title => "Sonic")
+        assert_empty GameExtendedWithTexticle.advanced_search(:title => "NES")
+        assert_empty GameExtendedWithTexticle.advanced_search(:system => "Mario")
+        assert_empty GameExtendedWithTexticle.advanced_search(:system => "NES", :title => "Sonic")
 
-        assert_equal [@mario], Game.advanced_search(:title => "Mario")
+        assert_equal [@mario], GameExtendedWithTexticle.advanced_search(:title => "Mario")
 
-        assert_equal 2, Game.advanced_search(:system => "NES").count
+        assert_equal 2, GameExtendedWithTexticle.advanced_search(:system => "NES").count
 
-        assert_equal [@zelda], Game.advanced_search(:system => "NES", :title => "Zelda")
-        assert_equal [@megam], Game.advanced_search(:title => "Mega")
+        assert_equal [@zelda], GameExtendedWithTexticle.advanced_search(:system => "NES", :title => "Zelda")
+        assert_equal [@megam], GameExtendedWithTexticle.advanced_search(:title => "Mega")
       end
 
       should "scope consecutively" do
-        assert_equal [@sfgen], Game.advanced_search(:system => "Genesis").advanced_search(:title => "Street Fighter")
+        assert_equal [@sfgen], GameExtendedWithTexticle.advanced_search(:system => "Genesis").advanced_search(:title => "Street Fighter")
       end
 
       should "cast non-:string columns as text" do
-        assert_equal [@mario], Game.advanced_search(:id => @mario.id)
+        assert_equal [@mario], GameExtendedWithTexticle.advanced_search(:id => @mario.id)
       end
     end
 
     context "when using dynamic search methods" do
       should "generate methods for each :string column" do
-        assert_equal [@mario], Game.advanced_search_by_title("Mario")
-        assert_equal [@takun], Game.advanced_search_by_system("Saturn")
+        assert_equal [@mario], GameExtendedWithTexticle.advanced_search_by_title("Mario")
+        assert_equal [@takun], GameExtendedWithTexticle.advanced_search_by_system("Saturn")
       end
 
       should "generate methods for each :text column" do
-        assert_equal [@mario], Game.advanced_search_by_description("platform")
+        assert_equal [@mario], GameExtendedWithTexticle.advanced_search_by_description("platform")
       end
 
       should "generate methods for any combination of :string and :text columns" do
-        assert_equal [@mario], Game.advanced_search_by_title_and_system("Mario", "NES")
-        assert_equal [@sonic], Game.advanced_search_by_system_and_title("Genesis", "Sonic")
-        assert_equal [@mario], Game.advanced_search_by_title_and_title("Mario", "Mario")
-        assert_equal [@megam], Game.advanced_search_by_title_and_description("Man", "Brain")
+        assert_equal [@mario], GameExtendedWithTexticle.advanced_search_by_title_and_system("Mario", "NES")
+        assert_equal [@sonic], GameExtendedWithTexticle.advanced_search_by_system_and_title("Genesis", "Sonic")
+        assert_equal [@mario], GameExtendedWithTexticle.advanced_search_by_title_and_title("Mario", "Mario")
+        assert_equal [@megam], GameExtendedWithTexticle.advanced_search_by_title_and_description("Man", "Brain")
       end
 
       should "generate methods for inclusive searches" do
-        assert_equal Set.new([@megam, @takun]), Game.advanced_search_by_system_or_title("Saturn", "Mega Man").to_set
+        assert_equal Set.new([@megam, @takun]), GameExtendedWithTexticle.advanced_search_by_system_or_title("Saturn", "Mega Man").to_set
       end
 
       should "scope consecutively" do
-        assert_equal [@sfgen], Game.advanced_search_by_system("Genesis").advanced_search_by_title("Street Fighter")
+        assert_equal [@sfgen], GameExtendedWithTexticle.advanced_search_by_system("Genesis").advanced_search_by_title("Street Fighter")
       end
 
       should "generate methods for non-:string columns" do
-        assert_equal [@mario], Game.advanced_search_by_id(@mario.id)
+        assert_equal [@mario], GameExtendedWithTexticle.advanced_search_by_id(@mario.id)
       end
 
       should "work with #respond_to?" do
-        assert Game.respond_to?(:advanced_search_by_system)
-        assert Game.respond_to?(:advanced_search_by_title)
-        assert Game.respond_to?(:advanced_search_by_system_and_title)
-        assert Game.respond_to?(:advanced_search_by_system_or_title)
-        assert Game.respond_to?(:advanced_search_by_title_and_title_and_title)
-        assert Game.respond_to?(:advanced_search_by_id)
+        assert GameExtendedWithTexticle.respond_to?(:advanced_search_by_system)
+        assert GameExtendedWithTexticle.respond_to?(:advanced_search_by_title)
+        assert GameExtendedWithTexticle.respond_to?(:advanced_search_by_system_and_title)
+        assert GameExtendedWithTexticle.respond_to?(:advanced_search_by_system_or_title)
+        assert GameExtendedWithTexticle.respond_to?(:advanced_search_by_title_and_title_and_title)
+        assert GameExtendedWithTexticle.respond_to?(:advanced_search_by_id)
 
-        assert !Game.respond_to?(:advanced_search_by_title_and_title_or_title)
+        assert !GameExtendedWithTexticle.respond_to?(:advanced_search_by_title_and_title_or_title)
       end
 
       should "allow for 2 arguments to #respond_to?" do
-        assert Game.respond_to?(:normalize, true)
+        assert GameExtendedWithTexticle.respond_to?(:normalize, true)
       end
     end
 
     context "when searching after selecting columns to return" do
       should "not fetch extra columns" do
         assert_raise(ActiveModel::MissingAttributeError) do
-          Game.select(:title).advanced_search("Mario").first.system
+          GameExtendedWithTexticle.select(:title).advanced_search("Mario").first.system
         end
       end
     end
-  end
 
-  context "when setting a custom search language" do
-    def Game.searchable_language
-      'spanish'
-    end
+    context "when setting a custom search language" do
+      class GameExtendedWithTexticleAndCustomLanguage < GameExtendedWithTexticle
+        def searchable_language
+          'spanish'
+        end
+      end
 
-    setup do
-      Game.create :system => "PS3", :title => "Harry Potter & the Deathly Hallows"
-    end
+      setup do
+        GameExtendedWithTexticleAndCustomLanguage.create :system => "PS3", :title => "Harry Potter & the Deathly Hallows"
+      end
 
-    teardown do
-      Game.delete_all
-    end
+      teardown do
+        GameExtendedWithTexticleAndCustomLanguage.delete_all
+      end
 
-    should "still find results" do
-      assert_not_empty Game.advanced_search_by_title("harry")
+      should "still find results" do
+        assert_not_empty GameExtendedWithTexticleAndCustomLanguage.advanced_search_by_title("harry")
+      end
     end
   end
 end