firewatir 1.2.1 → 1.6.2

data/unittests/radios_xpath_test.rb

@@ -1,100 +1,100 @@
 # feature tests for Radio Buttons
 # revision: $Revision: 1.0 $
 
-$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') if $0 == __FILE__
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
 require 'unittests/setup'
 
 class TC_Radios_XPath < Test::Unit::TestCase
-    include FireWatir
+    
 
     def setup()
-        $ff.goto($htmlRoot + "radioButtons1.html")
+        goto_page("radioButtons1.html")
     end
    
     def test_Radio_Exists
-       assert($ff.radio(:xpath, "//input[@name='box1']").exists?)   
-       assert($ff.radio(:xpath, "//input[@id='box5']").exists?)   
+       assert(browser.radio(:xpath, "//input[@name='box1']").exists?)   
+       assert(browser.radio(:xpath, "//input[@id='box5']").exists?)   
 
-       assert_false($ff.radio(:xpath, "//input[@name='missingname']").exists?)   
-       assert_false($ff.radio(:xpath, "//input[@id='missingid']").exists?)   
+       assert_false(browser.radio(:xpath, "//input[@name='missingname']").exists?)   
+       assert_false(browser.radio(:xpath, "//input[@id='missingid']").exists?)   
     end
 
     def test_Radio_Enabled
-       assert_raises(UnknownObjectException , "UnknownObjectException was supposed to be thrown" ) {   $ff.radio(:xpath, "//input[@name='noName']").enabled?  }  
-       assert_raises(UnknownObjectException , "UnknownObjectException was supposed to be thrown" ) {   $ff.radio(:xpath, "//input[@id='noName']").enabled?  }  
-       assert_raises(UnknownObjectException , "UnknownObjectException was supposed to be thrown" ) {   $ff.radio(:xpath, "//input[@name='box4' and @value='6']").enabled?  }  
+       assert_raises(UnknownObjectException) {   browser.radio(:xpath, "//input[@name='noName']").enabled?  }  
+       assert_raises(UnknownObjectException) {   browser.radio(:xpath, "//input[@id='noName']").enabled?  }  
+       assert_raises(UnknownObjectException) {   browser.radio(:xpath, "//input[@name='box4' and @value='6']").enabled?  }  
 
-       assert_false($ff.radio(:xpath, "//input[@name='box2']").enabled?)   
-       assert($ff.radio(:xpath, "//input[@id='box5']").enabled?)   
-       assert($ff.radio(:xpath, "//input[@name='box1']").enabled?)   
+       assert_false(browser.radio(:xpath, "//input[@name='box2']").enabled?)   
+       assert(browser.radio(:xpath, "//input[@id='box5']").enabled?)   
+       assert(browser.radio(:xpath, "//input[@name='box1']").enabled?)   
     end
 
    def test_little
-       assert_false($ff.button(:xpath,"//input[@name='foo']").enabled?)
+       assert_false(browser.button(:xpath,"//input[@name='foo']").enabled?)
    end
 
    def test_onClick
-       assert_false($ff.button(:xpath,"//input[@name='foo']").enabled?)          
-       $ff.radio(:xpath, "//input[@name='box5' and @value='1']").set
-       assert($ff.button(:xpath,"//input[@name='foo']").enabled?)        
+       assert_false(browser.button(:xpath,"//input[@name='foo']").enabled?)          
+       browser.radio(:xpath, "//input[@name='box5' and @value='1']").set
+       assert(browser.button(:xpath,"//input[@name='foo']").enabled?)        
 
-       $ff.radio(:xpath, "//input[@name='box5' and @value='2']").set
-       assert_false($ff.button(:xpath,"//input[@name='foo']").enabled?)
+       browser.radio(:xpath, "//input[@name='box5' and @value='2']").set
+       assert_false(browser.button(:xpath,"//input[@name='foo']").enabled?)
     end
 
     def test_Radio_isSet
-       assert_raises(UnknownObjectException , "UnknownObjectException was supposed to be thrown" ) {   $ff.radio(:xpath, "//input[@name='noName']").isSet?  }  
+       assert_raises(UnknownObjectException) {   browser.radio(:xpath, "//input[@name='noName']").isSet?  }  
 
-       puts "radio 1 is set : #{ $ff.radio(:xpath, "//input[@name='box1']").isSet? } "
-       assert_false($ff.radio(:xpath, "//input[@name='box1']").isSet?)   
+       puts "radio 1 is set : #{ browser.radio(:xpath, "//input[@name='box1']").isSet? } "
+       assert_false(browser.radio(:xpath, "//input[@name='box1']").isSet?)   
 
-       assert($ff.radio(:xpath, "//input[@name='box3']").isSet?)   
-       assert_false($ff.radio(:xpath, "//input[@name='box2']").isSet?)   
+       assert(browser.radio(:xpath, "//input[@name='box3']").isSet?)   
+       assert_false(browser.radio(:xpath, "//input[@name='box2']").isSet?)   
 
-       assert( $ff.radio(:xpath, "//input[@name='box4' and @value='1']").isSet?)   
-       assert_false($ff.radio(:xpath, "//input[@name='box4' and @value='2']").isSet?)   
+       assert( browser.radio(:xpath, "//input[@name='box4' and @value='1']").isSet?)   
+       assert_false(browser.radio(:xpath, "//input[@name='box4' and @value='2']").isSet?)   
     end
 
     def test_radio_clear
-       assert_raises(UnknownObjectException , "UnknownObjectException was supposed to be thrown" ) {   $ff.radio(:xpath, "//input[@name='noName']").clear  }  
+       assert_raises(UnknownObjectException) {   browser.radio(:xpath, "//input[@name='noName']").clear  }  
 
-       $ff.radio(:xpath, "//input[@name='box1']").clear
-       assert_false($ff.radio(:xpath, "//input[@name='box1']").isSet?)   
+       browser.radio(:xpath, "//input[@name='box1']").clear
+       assert_false(browser.radio(:xpath, "//input[@name='box1']").isSet?)   
 
-       assert_raises(ObjectDisabledException, "ObjectDisabledException was supposed to be thrown" ) {   $ff.radio(:xpath, "//input[@name='box2']").clear  } 
-       assert_false($ff.radio(:xpath, "//input[@name='box2']").isSet?)   
+       assert_raises(ObjectDisabledException, "ObjectDisabledException was supposed to be thrown" ) {   browser.radio(:xpath, "//input[@name='box2']").clear  } 
+       assert_false(browser.radio(:xpath, "//input[@name='box2']").isSet?)   
 
-       $ff.radio(:xpath, "//input[@name='box3']").clear
-       assert_false($ff.radio(:xpath, "//input[@name='box3']").isSet?)   
+       browser.radio(:xpath, "//input[@name='box3']").clear
+       assert_false(browser.radio(:xpath, "//input[@name='box3']").isSet?)   
 
-       $ff.radio(:xpath, "//input[@name='box4' and @value='1']").clear
-       assert_false($ff.radio(:xpath, "//input[@name='box4' and @value='1']").isSet?)   
+       browser.radio(:xpath, "//input[@name='box4' and @value='1']").clear
+       assert_false(browser.radio(:xpath, "//input[@name='box4' and @value='1']").isSet?)   
     end
 
     def test_radio_getState
-       assert_raises(UnknownObjectException , "UnknownObjectException was supposed to be thrown" ) {   $ff.radio(:xpath, "//input[@name='noName']").getState  }  
+       assert_raises(UnknownObjectException) {   browser.radio(:xpath, "//input[@name='noName']").getState  }  
 
-       assert_equal( false , $ff.radio(:xpath, "//input[@name='box1']").getState )   
-       assert_equal( true , $ff.radio(:xpath, "//input[@name='box3']").getState)   
+       assert_equal( false , browser.radio(:xpath, "//input[@name='box1']").getState )   
+       assert_equal( true , browser.radio(:xpath, "//input[@name='box3']").getState)   
 
        # radioes that have the same name but different values
-       assert_equal( false , $ff.radio(:xpath, "//input[@name='box4' and @value='2']").getState )   
-       assert_equal( true , $ff.radio(:xpath, "//input[@name='box4' and @value='1']").getState)   
+       assert_equal( false , browser.radio(:xpath, "//input[@name='box4' and @value='2']").getState )   
+       assert_equal( true , browser.radio(:xpath, "//input[@name='box4' and @value='1']").getState)   
     end
 
     def test_radio_set
-       assert_raises(UnknownObjectException , "UnknownObjectException was supposed to be thrown" ) {   $ff.radio(:xpath, "//input[@name='noName']").set  }  
-       $ff.radio(:xpath, "//input[@name='box1']").set
-       assert($ff.radio(:xpath, "//input[@name='box1']").isSet?)   
+       assert_raises(UnknownObjectException) {   browser.radio(:xpath, "//input[@name='noName']").set  }  
+       browser.radio(:xpath, "//input[@name='box1']").set
+       assert(browser.radio(:xpath, "//input[@name='box1']").isSet?)   
 
-       assert_raises(ObjectDisabledException, "ObjectDisabledException was supposed to be thrown" ) {   $ff.radio(:xpath, "//input[@name='box2']").set  }  
+       assert_raises(ObjectDisabledException, "ObjectDisabledException was supposed to be thrown" ) {   browser.radio(:xpath, "//input[@name='box2']").set  }  
 
-       $ff.radio(:xpath, "//input[@name='box3']").set
-       assert($ff.radio(:xpath, "//input[@name='box3']").isSet?)   
+       browser.radio(:xpath, "//input[@name='box3']").set
+       assert(browser.radio(:xpath, "//input[@name='box3']").isSet?)   
 
        # radioes that have the same name but different values
-       $ff.radio(:xpath, "//input[@name='box4' and @value='3']").set
-       assert($ff.radio(:xpath, "//input[@name='box4' and @value='3']").isSet?)   
+       browser.radio(:xpath, "//input[@name='box4' and @value='3']").set
+       assert(browser.radio(:xpath, "//input[@name='box4' and @value='3']").isSet?)   
     end
 
 end

data/unittests/redirect_test.rb

@@ -1,40 +1,41 @@
 # feature tests for Javascript redirect
 # revision: $Revision: 1.0 $
 
-$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') if $0 == __FILE__
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
 require 'unittests/setup'
 
 class TC_Redirect < Test::Unit::TestCase
-  include FireWatir
-  
+    
   def setup
-    $ff.goto($htmlRoot + "redirect.html")
+    goto_page("redirect.html")
   end
   
   def goto_multiple_redirect
-    $ff.goto($htmlRoot + "redirect1.html")
+    goto_page("redirect1.html")
   end
 
+  tag_method :test_single_redirect, :fails_on_ie
   def test_single_redirect
-    assert_raises(UnknownObjectException) {$ff.div(:id , "div77").click }
-    assert_raises(UnknownObjectException) {$ff.div(:title , "div77").click }
+    assert_raises(UnknownObjectException) {browser.div(:id , "div77").click }
+    assert_raises(UnknownObjectException) {browser.div(:title , "div77").click }
     
-    assert($ff.text_field(:name, "text1").verify_contains("0") )  
-    $ff.div(:id , "div3").click
-    assert($ff.text_field(:name, "text1").verify_contains("1") )  
-    $ff.div(:id , "div4").click
-    assert($ff.text_field(:name, "text1").verify_contains("0") )  
+    assert(browser.text_field(:name, "text1").verify_contains("0") )  
+    browser.div(:id , "div3").click
+    assert(browser.text_field(:name, "text1").verify_contains("1") )  
+    browser.div(:id , "div4").click
+    assert(browser.text_field(:name, "text1").verify_contains("0") )  
   end
   
+  tag_method :test_multiple_redirect, :fails_on_ie
   def test_multiple_redirect
     goto_multiple_redirect()
-    assert_raises(UnknownObjectException) {$ff.div(:id , "div77").click }
-    assert_raises(UnknownObjectException) {$ff.div(:title , "div77").click }
+    assert_raises(UnknownObjectException) {browser.div(:id , "div77").click }
+    assert_raises(UnknownObjectException) {browser.div(:title , "div77").click }
     
-    assert($ff.text_field(:name, "text1").verify_contains("0") )  
-    $ff.div(:id , "div3").click
-    assert($ff.text_field(:name, "text1").verify_contains("1") )  
-    $ff.div(:id , "div4").click
-    assert($ff.text_field(:name, "text1").verify_contains("0") )  
+    assert(browser.text_field(:name, "text1").verify_contains("0") )  
+    browser.div(:id , "div3").click
+    assert(browser.text_field(:name, "text1").verify_contains("1") )  
+    browser.div(:id , "div4").click
+    assert(browser.text_field(:name, "text1").verify_contains("0") )  
   end
 end

data/unittests/selectbox_test.rb

@@ -1,141 +1,142 @@
 # feature tests for Select Boxes
 # revision: $Revision: 1.0 $
 
-$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') if $0 == __FILE__
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
 require 'unittests/setup'
 
 class TC_SelectList < Test::Unit::TestCase
-    include FireWatir
+    
     
     def setup()
-        $ff.goto($htmlRoot + "selectboxes1.html")
+        goto_page("selectboxes1.html")
     end
     
     def test_textBox_Exists
-        assert($ff.select_list(:name, "sel1").exists?)   
-        assert_false($ff.select_list(:name, "missing").exists?)   
-        assert_false($ff.select_list(:id, "missing").exists?)   
+        assert(browser.select_list(:name, "sel1").exists?)   
+        assert_false(browser.select_list(:name, "missing").exists?)   
+        assert_false(browser.select_list(:id, "missing").exists?)   
     end
 
     def test_select_list_enabled
-        assert($ff.select_list(:name, "sel1").enabled?)   
-        assert_raises(UnknownObjectException) { $ff.select_list(:name, "NoName").enabled? }  
+        assert(browser.select_list(:name, "sel1").enabled?)   
+        assert_raises(UnknownObjectException) { browser.select_list(:name, "NoName").enabled? }  
     end
 
     def test_select_list_getAllContents
-        assert_raises(UnknownObjectException) { $ff.select_list(:name, "NoName").getAllContents }  
+        assert_raises(UnknownObjectException) { browser.select_list(:name, "NoName").getAllContents }  
         assert_equal( ["Option 1" ,"Option 2" , "Option 3" , "Option 4"] , 
-        $ff.select_list(:name, "sel1").getAllContents)   
+        browser.select_list(:name, "sel1").getAllContents)   
     end
 
     def test_Option_text_select
-        assert_raises(UnknownObjectException) { $ff.select_list(:name, "sel1").option(:text, "missing item").select }  
-        assert_raises(UnknownObjectException) { $ff.select_list(:name, "sel1").option(:text, /missing/).select }  
-        assert_raises(MissingWayOfFindingObjectException) { $ff.select_list(:name, "sel1").option(:missing, "Option 1").select }
+        assert_raises(UnknownObjectException) { browser.select_list(:name, "sel1").option(:text, "missing item").select }  
+        assert_raises(UnknownObjectException) { browser.select_list(:name, "sel1").option(:text, /missing/).select }  
+        assert_raises(MissingWayOfFindingObjectException) { browser.select_list(:name, "sel1").option(:missing, "Option 1").select }
 
         # the select method keeps any currently selected items - use the clear selection method first
-        $ff.select_list( :name , "sel1").clearSelection
-        $ff.select_list( :name , "sel1").option(:text, "Option 1").select
-        assert_equal( ["Option 1" ] , $ff.select_list(:name, "sel1").getSelectedItems)   
+        browser.select_list( :name , "sel1").clearSelection
+        browser.select_list( :name , "sel1").option(:text, "Option 1").select
+        assert_equal( ["Option 1" ] , browser.select_list(:name, "sel1").getSelectedItems)   
     end    
 
 
+    tag_method :test_option_class_name, :fails_on_ie
     def test_option_class_name
 
         # the option object doesnt inherit from element, so this doesnt work
-        assert_raises(UnknownObjectException) { $ff.select_list(:name, "sel1").option(:text, "missing item").class_name }  
-        assert_equal("option_style" , $ff.select_list(:name, "sel2").option(:value , 'o2').class_name)   
-        assert_equal("" , $ff.select_list(:name, "sel2").option(:value , 'o1').class_name)   
+        assert_raises(UnknownObjectException) { browser.select_list(:name, "sel1").option(:text, "missing item").class_name }  
+        assert_equal("option_style" , browser.select_list(:name, "sel2").option(:value , 'o2').class_name)   
+        assert_equal("" , browser.select_list(:name, "sel2").option(:value , 'o1').class_name)   
 
     end
 
     def test_selectBox_select_using_value
-        assert_raises(UnknownObjectException) { $ff.select_list(:name, "NoName").getSelectedItems }  
-        assert_raises(NoValueFoundException) { $ff.select_list(:name, "sel1").select_value("missing item") }  
-        assert_raises(NoValueFoundException) { $ff.select_list(:name, "sel1").select_value(/missing/) }  
+        assert_raises(UnknownObjectException) { browser.select_list(:name, "NoName").getSelectedItems }  
+        assert_raises(NoValueFoundException) { browser.select_list(:name, "sel1").select_value("missing item") }  
+        assert_raises(NoValueFoundException) { browser.select_list(:name, "sel1").select_value(/missing/) }  
         
         # the select method keeps any currently selected items - use the clear selectcion method first
-        $ff.select_list( :name , "sel1").clearSelection
-        $ff.select_list( :name , "sel1").select_value("o1")
-        assert_equal( ["Option 1" ] , $ff.select_list(:name, "sel1").getSelectedItems)   
+        browser.select_list( :name , "sel1").clearSelection
+        browser.select_list( :name , "sel1").select_value("o1")
+        assert_equal( ["Option 1" ] , browser.select_list(:name, "sel1").getSelectedItems)   
         
-        $ff.select_list( :name , "sel1").clearSelection
-        $ff.select_list( :name , "sel1").select_value(/2/)
-        assert_equal( ["Option 2" ] , $ff.select_list(:name, "sel1").getSelectedItems)   
+        browser.select_list( :name , "sel1").clearSelection
+        browser.select_list( :name , "sel1").select_value(/2/)
+        assert_equal( ["Option 2" ] , browser.select_list(:name, "sel1").getSelectedItems)   
         
-        $ff.select_list( :name , "sel2").clearSelection
-        $ff.select_list( :name , "sel2").select_value(/4/)
-        $ff.select_list( :name , "sel2").select_value(/2/)
+        browser.select_list( :name , "sel2").clearSelection
+        browser.select_list( :name , "sel2").select_value(/4/)
+        browser.select_list( :name , "sel2").select_value(/2/)
         assert_equal( ["Option 2" , "Option 4" ] , 
-        $ff.select_list(:name, "sel2").getSelectedItems)   
+        browser.select_list(:name, "sel2").getSelectedItems)   
         
         # these are to test the onchange event
         # the event shouldnt get fired, as this is the selected item
-        $ff.select_list( :name , "sel3").select_value( /3/ )
-        assert_false($ff.text.include?("Pass") )
+        browser.select_list( :name , "sel3").select_value( /3/ )
+        assert_false(browser.text.include?("Pass") )
     end
     
     def test_select_list_select_using_value2
         # the event should get fired
-        $ff.select_list( :name , "sel3").select_value( /2/ )
-        assert($ff.text.include?("PASS") )
+        browser.select_list( :name , "sel3").select_value( /2/ )
+        assert(browser.text.include?("PASS") )
     end
     
     def test_select_list_properties
-        assert_raises(UnknownObjectException) { $ff.select_list(:index, 199).value }  
-        assert_raises(UnknownObjectException) { $ff.select_list(:index, 199).name }  
-        assert_raises(UnknownObjectException) { $ff.select_list(:index, 199).id }  
-        assert_raises(UnknownObjectException) { $ff.select_list(:index, 199).disabled }  
-        assert_raises(UnknownObjectException) { $ff.select_list(:index, 199).type }  
+        assert_raises(UnknownObjectException) { browser.select_list(:index, 199).value }  
+        assert_raises(UnknownObjectException) { browser.select_list(:index, 199).name }  
+        assert_raises(UnknownObjectException) { browser.select_list(:index, 199).id }  
+        assert_raises(UnknownObjectException) { browser.select_list(:index, 199).disabled }  
+        assert_raises(UnknownObjectException) { browser.select_list(:index, 199).type }  
         
-        assert_equal("o3"   ,    $ff.select_list(:index, 1).value)  
-        assert_equal("sel1" ,    $ff.select_list(:index, 1).name )  
-        assert_equal(""     ,    $ff.select_list(:index, 1).id )  
-        assert_equal("select-one",         $ff.select_list(:index, 1).type )  
-        assert_equal("select-multiple",    $ff.select_list(:index, 2).type )  
+        assert_equal("o3"   ,    browser.select_list(:index, 1).value)  
+        assert_equal("sel1" ,    browser.select_list(:index, 1).name )  
+        assert_equal(""     ,    browser.select_list(:index, 1).id )  
+        assert_equal("select-one",         browser.select_list(:index, 1).type )  
+        assert_equal("select-multiple",    browser.select_list(:index, 2).type )  
         
-        $ff.select_list(:index,1).select(/1/)
-        assert_equal("o1"   ,    $ff.select_list(:index, 1).value)  
+        browser.select_list(:index,1).select(/1/)
+        assert_equal("o1"   ,    browser.select_list(:index, 1).value)  
                 
-        assert_false( $ff.select_list(:index, 1).disabled )
-        assert( $ff.select_list(:index, 4).disabled )
-        assert( $ff.select_list(:id, 'selectbox_4').disabled )
+        assert_false( browser.select_list(:index, 1).disabled )
+        assert( browser.select_list(:index, 4).disabled )
+        assert( browser.select_list(:id, 'selectbox_4').disabled )
     end
     
     def test_select_list_iterator
-        assert_equal(5, $ff.select_lists.length)
-        assert_equal("o3"   ,    $ff.select_lists[1].value)  
-        assert_equal("sel1" ,    $ff.select_lists[1].name )  
-        assert_equal("select-one",         $ff.select_lists[1].type )  
-        assert_equal("select-multiple" ,   $ff.select_lists[2].type )  
+        assert_equal(5, browser.select_lists.length)
+        assert_equal("o3"   ,    browser.select_lists[1].value)  
+        assert_equal("sel1" ,    browser.select_lists[1].name )  
+        assert_equal("select-one",         browser.select_lists[1].type )  
+        assert_equal("select-multiple" ,   browser.select_lists[2].type )  
         
         index=1
-        $ff.select_lists.each do |l|
-            assert_equal( $ff.select_list(:index, index).name , l.name )
-            assert_equal( $ff.select_list(:index, index).id , l.id )
-            assert_equal( $ff.select_list(:index, index).type , l.type )
-            assert_equal( $ff.select_list(:index, index).value , l.value )
+        browser.select_lists.each do |l|
+            assert_equal( browser.select_list(:index, index).name , l.name )
+            assert_equal( browser.select_list(:index, index).id , l.id )
+            assert_equal( browser.select_list(:index, index).type , l.type )
+            assert_equal( browser.select_list(:index, index).value , l.value )
             index+=1
         end
-        assert_equal( index-1, $ff.select_lists.length)
+        assert_equal( index-1, browser.select_lists.length)
         # Bug Fix 25 
-        $ff.select_lists.each { |list| puts list.getAllContents() }
+        browser.select_lists.each { |list| puts list.getAllContents() }
     end
 end
 
 class TC_Select_Options < Test::Unit::TestCase
-    include FireWatir
-   
+    tags :fails_on_ie
+       
     def setup()
-        $ff.goto($htmlRoot + "select_tealeaf.html")
+        goto_page("select_tealeaf.html")
     end
    
     def test_options_text
-        $ff.select_list(:name, 'op_numhits').option(:text, '>=').select
-        assert($ff.select_list(:name, 'op_numhits').option(:text, '>=').selected)
-        assert_equal( [">=" ] , $ff.select_list(:name, "op_numhits").getSelectedItems)   
-        assert_equal( "=" , $ff.select_list(:name, "op_numhits")[1].text)   
-        assert_equal( "0" , $ff.select_list(:name, "op_numhits")[1].value)   
+        browser.select_list(:name, 'op_numhits').option(:text, '>=').select
+        assert(browser.select_list(:name, 'op_numhits').option(:text, '>=').selected)
+        assert_equal( [">=" ] , browser.select_list(:name, "op_numhits").getSelectedItems)   
+        assert_equal( "=" , browser.select_list(:name, "op_numhits")[1].text)   
+        assert_equal( "0" , browser.select_list(:name, "op_numhits")[1].value)   
     end
 end
 

data/unittests/selectbox_xpath_test.rb

@@ -1,127 +1,129 @@
 # feature tests for Select Boxes
 # revision: $Revision: 1.0 $
 
-$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') if $0 == __FILE__
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
 require 'unittests/setup'
 
 class TC_Selectbox_XPath < Test::Unit::TestCase
-    include FireWatir
+    
 
     def setup()
-        $ff.goto($htmlRoot + "selectboxes1.html")
+        goto_page("selectboxes1.html")
     end
 
     def test_textBox_Exists
-       assert($ff.select_list(:xpath, "//select[@name='sel1']").exists?)   
-       assert_false($ff.select_list(:xpath, "//select[@name='missing']").exists?)   
-       assert_false($ff.select_list(:xpath, "//select[@id='missing']").exists?)   
+       assert(browser.select_list(:xpath, "//select[@name='sel1']").exists?)   
+       assert_false(browser.select_list(:xpath, "//select[@name='missing']").exists?)   
+       assert_false(browser.select_list(:xpath, "//select[@id='missing']").exists?)   
     end
 
+    tag_method :test_element_by_xpath_class, :fails_on_ie
     def test_element_by_xpath_class
-      element = $ff.element_by_xpath("//select[@name='sel1']")
-      assert(element.instance_of?(SelectList),"element class should be #{SelectList}; got #{element.class}")
+      element = browser.element_by_xpath("//select[@name='sel1']")
+      assert_class(element, 'SelectList')
       # FIXME got HTMLAnchorElement, should've gotten HTMLSelectElement
       # TODO: If element is not present, this should return null
-      #element = $ff.element_by_xpath("//select[@name='missing']")
+      #element = browser.element_by_xpath("//select[@name='missing']")
       #assert(element.instance_of?(SelectList),"element class should be #{SelectList}; got #{element.class}")
       # FIXME got HTMLAnchorElement, should've gotten HTMLSelectElement
       # TODO: If element is not present, this should return null
-      #element = $ff.element_by_xpath("//select[@id='missing']")
+      #element = browser.element_by_xpath("//select[@id='missing']")
       #assert(element.instance_of?(SelectList),"element class should be #{SelectList}; got #{element.class}")
     end
 
     def test_select_list_enabled
-       assert($ff.select_list(:xpath, "//select[@name='sel1']").enabled?)   
-       assert_raises(UnknownObjectException) { $ff.select_list(:xpath, "//select[@name='NoName']").enabled? }  
+       assert(browser.select_list(:xpath, "//select[@name='sel1']").enabled?)   
+       assert_raises(UnknownObjectException) { browser.select_list(:xpath, "//select[@name='NoName']").enabled? }  
     end
 
     def test_select_list_getAllContents
-       assert_raises(UnknownObjectException) { $ff.select_list(:xpath, "//select[@name='NoName']").getAllContents }  
+       assert_raises(UnknownObjectException) { browser.select_list(:xpath, "//select[@name='NoName']").getAllContents }  
        assert_equal( ["Option 1" ,"Option 2" , "Option 3" , "Option 4"] , 
-           $ff.select_list(:xpath, "//select[@name='sel1']").getAllContents)   
+           browser.select_list(:xpath, "//select[@name='sel1']").getAllContents)   
     end
 
     def test_select_list_getSelectedItems
-       assert_raises(UnknownObjectException) { $ff.select_list(:xpath, "//select[@name='NoName']").getSelectedItems }  
+       assert_raises(UnknownObjectException) { browser.select_list(:xpath, "//select[@name='NoName']").getSelectedItems }  
        assert_equal( ["Option 3" ] , 
-           $ff.select_list(:xpath, "//select[@name='sel1']").getSelectedItems)   
+           browser.select_list(:xpath, "//select[@name='sel1']").getSelectedItems)   
        assert_equal( ["Option 3" , "Option 6" ] , 
-           $ff.select_list(:xpath, "//select[@name='sel2']").getSelectedItems)   
+           browser.select_list(:xpath, "//select[@name='sel2']").getSelectedItems)   
     end
 
+    tag_method :test_clearSelection, :fails_on_ie
     def test_clearSelection
-       assert_raises(UnknownObjectException) { $ff.select_list(:xpath, "//select[@name='NoName']").clearSelection }  
-       $ff.select_list(:xpath, "//select[@name='sel1']").clearSelection
+       assert_raises(UnknownObjectException) { browser.select_list(:xpath, "//select[@name='NoName']").clearSelection }  
+       browser.select_list(:xpath, "//select[@name='sel1']").clearSelection
 
        # the box sel1 has no ability to have a de-selected item
        # By default Option 1 will be selected
-       assert_equal( ["Option 1" ] , $ff.select_list(:xpath, "//select[@name='sel1']").getSelectedItems)   
+       assert_equal( ["Option 1" ] , browser.select_list(:xpath, "//select[@name='sel1']").getSelectedItems)   
 
-       $ff.select_list(:xpath, "//select[@name='sel2']").clearSelection
-       assert_equal( [ ] , $ff.select_list(:xpath, "//select[@name='sel2']").getSelectedItems)   
+       browser.select_list(:xpath, "//select[@name='sel2']").clearSelection
+       assert_equal( [ ] , browser.select_list(:xpath, "//select[@name='sel2']").getSelectedItems)   
     end
 
     def test_select_list_select
-       assert_raises(UnknownObjectException) { $ff.select_list(:xpath, "//select[@name='NoName']").getSelectedItems }  
-       assert_raises(NoValueFoundException) { $ff.select_list(:xpath, "//select[@name='sel1']").select("missing item") }  
-       assert_raises(NoValueFoundException) { $ff.select_list(:xpath, "//select[@name='sel1']").select(/missing/) }  
+       assert_raises(UnknownObjectException) { browser.select_list(:xpath, "//select[@name='NoName']").getSelectedItems }  
+       assert_raises(NoValueFoundException) { browser.select_list(:xpath, "//select[@name='sel1']").select("missing item") }  
+       assert_raises(NoValueFoundException) { browser.select_list(:xpath, "//select[@name='sel1']").select(/missing/) }  
 
        # the select method keeps any currently selected items - use the clear selectcion method first
-       $ff.select_list(:xpath, "//select[@name='sel1']").clearSelection
-       $ff.select_list(:xpath, "//select[@name='sel1']").select("Option 1")
-       assert_equal( ["Option 1" ] , $ff.select_list(:xpath, "//select[@name='sel1']").getSelectedItems)   
+       browser.select_list(:xpath, "//select[@name='sel1']").clearSelection
+       browser.select_list(:xpath, "//select[@name='sel1']").select("Option 1")
+       assert_equal( ["Option 1" ] , browser.select_list(:xpath, "//select[@name='sel1']").getSelectedItems)   
 
-       $ff.select_list(:xpath, "//select[@name='sel1']").clearSelection
-       $ff.select_list(:xpath, "//select[@name='sel1']").select(/2/)
-       assert_equal( ["Option 2" ] , $ff.select_list(:xpath, "//select[@name='sel1']").getSelectedItems)   
+       browser.select_list(:xpath, "//select[@name='sel1']").clearSelection
+       browser.select_list(:xpath, "//select[@name='sel1']").select(/2/)
+       assert_equal( ["Option 2" ] , browser.select_list(:xpath, "//select[@name='sel1']").getSelectedItems)   
 
-       $ff.select_list(:xpath, "//select[@name='sel2']").clearSelection
-       $ff.select_list(:xpath, "//select[@name='sel2']").select( /2/ )
-       $ff.select_list(:xpath, "//select[@name='sel2']").select( /4/ )
+       browser.select_list(:xpath, "//select[@name='sel2']").clearSelection
+       browser.select_list(:xpath, "//select[@name='sel2']").select( /2/ )
+       browser.select_list(:xpath, "//select[@name='sel2']").select( /4/ )
        assert_equal( ["Option 2" , "Option 4" ] , 
-       $ff.select_list(:xpath, "//select[@name='sel2']").getSelectedItems)   
+       browser.select_list(:xpath, "//select[@name='sel2']").getSelectedItems)   
 
        # these are to test the onchange event
        # the event shouldnt get fired, as this is the selected item
-       $ff.select_list(:xpath, "//select[@name='sel3']").select( /3/ )
-       assert_false($ff.text.include?("Pass") )
+       browser.select_list(:xpath, "//select[@name='sel3']").select( /3/ )
+       assert_false(browser.text.include?("Pass") )
     end
 
     def test_select_list_select2
        # the event should get fired
-       $ff.select_list(:xpath, "//select[@name='sel3']").select( /2/ )
-       assert($ff.text.include?("PASS") )
+       browser.select_list(:xpath, "//select[@name='sel3']").select( /2/ )
+       assert(browser.text.include?("PASS") )
     end
 
     def test_select_list_select_using_value
-       assert_raises(UnknownObjectException) { $ff.select_list(:xpath, "//select[@name='NoName']").getSelectedItems }  
-       assert_raises(NoValueFoundException) { $ff.select_list(:xpath, "//select[@name='sel1']").select_value("missing item") }  
-       assert_raises(NoValueFoundException) { $ff.select_list(:xpath, "//select[@name='sel1']").select_value(/missing/) }  
+       assert_raises(UnknownObjectException) { browser.select_list(:xpath, "//select[@name='NoName']").getSelectedItems }  
+       assert_raises(NoValueFoundException) { browser.select_list(:xpath, "//select[@name='sel1']").select_value("missing item") }  
+       assert_raises(NoValueFoundException) { browser.select_list(:xpath, "//select[@name='sel1']").select_value(/missing/) }  
 
        # the select method keeps any currently selected items - use the clear selectcion method first
-       $ff.select_list(:xpath, "//select[@name='sel1']").clearSelection
-       $ff.select_list(:xpath, "//select[@name='sel1']").select_value("o1")
-       assert_equal( ["Option 1" ] , $ff.select_list(:xpath, "//select[@name='sel1']").getSelectedItems)   
+       browser.select_list(:xpath, "//select[@name='sel1']").clearSelection
+       browser.select_list(:xpath, "//select[@name='sel1']").select_value("o1")
+       assert_equal( ["Option 1" ] , browser.select_list(:xpath, "//select[@name='sel1']").getSelectedItems)   
 
-       $ff.select_list(:xpath, "//select[@name='sel1']").clearSelection
-       $ff.select_list(:xpath, "//select[@name='sel1']").select_value(/2/)
-       assert_equal( ["Option 2" ] , $ff.select_list(:xpath, "//select[@name='sel1']").getSelectedItems)   
+       browser.select_list(:xpath, "//select[@name='sel1']").clearSelection
+       browser.select_list(:xpath, "//select[@name='sel1']").select_value(/2/)
+       assert_equal( ["Option 2" ] , browser.select_list(:xpath, "//select[@name='sel1']").getSelectedItems)   
 
-       $ff.select_list(:xpath, "//select[@name='sel2']").clearSelection
-       $ff.select_list(:xpath, "//select[@name='sel2']").select( /2/ )
-       $ff.select_list(:xpath, "//select[@name='sel2']").select( /4/ )
-       assert_equal( ["Option 2" , "Option 4" ] , $ff.select_list(:xpath, "//select[@name='sel2']").getSelectedItems)   
+       browser.select_list(:xpath, "//select[@name='sel2']").clearSelection
+       browser.select_list(:xpath, "//select[@name='sel2']").select( /2/ )
+       browser.select_list(:xpath, "//select[@name='sel2']").select( /4/ )
+       assert_equal( ["Option 2" , "Option 4" ] , browser.select_list(:xpath, "//select[@name='sel2']").getSelectedItems)   
 
        # these are to test the onchange event
        # the event shouldnt get fired, as this is the selected item
-       $ff.select_list(:xpath, "//select[@name='sel3']").select_value( /3/ )
-       assert_false($ff.text.include?("Pass") )
+       browser.select_list(:xpath, "//select[@name='sel3']").select_value( /3/ )
+       assert_false(browser.text.include?("Pass") )
     end
 
     def test_select_list_select_using_value2
        # the event should get fired
-       $ff.select_list(:xpath, "//select[@name='sel3']").select_value( /2/ )
-       assert($ff.text.include?("PASS") )
+       browser.select_list(:xpath, "//select[@name='sel3']").select_value( /2/ )
+       assert(browser.text.include?("PASS") )
     end
 
 end