watir 1.9.2 → 2.0.0.rc2

data/unittests/ie_test.rb

@@ -25,25 +25,25 @@ class TC_ie < Test::Unit::TestCase
   
   # is this correct? 
   def test_getLink_ByIndexReturnsNilOnNoLinks
-    assert_nil(@faked_ie.locate_tagged_element('A', :index, 1))
-    assert_nil(@faked_ie.locate_tagged_element('A', :index, 1))
+    assert_nil(@faked_ie.tagged_element_locator('A', :index, 0))
+    assert_nil(@faked_ie.tagged_element_locator('A', :index, 0))
   end
   
   def test_getLink_ByBadHow
     @faked_ie.addLink "foo"
     assert_raise(MissingWayOfFindingObjectException) do
-      @faked_ie.locate_tagged_element('A', :no_such_mechanism, "verifying error handling")
+      @faked_ie.tagged_element_locator('A', :no_such_mechanism, "verifying error handling")
     end
   end
   
   # is this correct? 
   def test_getLink_ByUrlReturnsNilOnNoLinks
-    assert_nil(@faked_ie.locate_tagged_element('A', :url, "whatever"))
+    assert_nil(@faked_ie.tagged_element_locator('A', :url, "whatever"))
   end
   
   # is this correct? 
   def test_getLink_ByTextReturnsNilOnNoLinks
-    assert_nil(@faked_ie.locate_tagged_element('A', :text, "whatever"))
+    assert_nil(@faked_ie.tagged_element_locator('A', :text, "whatever"))
   end
 
 end

data/unittests/images_test.rb

@@ -96,25 +96,25 @@ class TC_Images < Test::Unit::TestCase
     assert_raises(UnknownObjectException) { browser.image(:index, 82).alt}
     assert_raises(UnknownObjectException) { browser.image(:index, 82).title}
     
-    assert_equal( ""       , browser.image(:index, 2).name ) 
-    assert_equal( "square" , browser.image(:index, 2).id )
-    assert_match( /square\.jpg/i ,browser.image(:index, 2).src )
-    assert_equal( "" , browser.image(:index, 2).value )
-    assert_equal( "88" , browser.image(:index, 2).height )
-    assert_equal( "88" , browser.image(:index, 2).width )
+    assert_equal( ""       , browser.image(:index, 1).name ) 
+    assert_equal( "square" , browser.image(:index, 1).id )
+    assert_match( /square\.jpg/i ,browser.image(:index, 1).src )
+    assert_equal( "" , browser.image(:index, 1).value )
+    assert_equal( "88" , browser.image(:index, 1).height )
+    assert_equal( "88" , browser.image(:index, 1).width )
     
     # this line fails, as the date is when it is installed on the local oc, not the date the file was really created
     #assert_equal( "03/10/2005" , browser.image(:index, 2).fileCreatedDate )
-    assert_equal( "788",  browser.image(:index, 2).fileSize )
+    assert_equal( "788",  browser.image(:index, 1).fileSize )
     
     # tool tips: alt text + title
-    assert_equal('circle' , browser.image(:index, 6).alt) 
-    assert_equal( ""      , browser.image(:index, 2).alt) 
+    assert_equal('circle' , browser.image(:index, 5).alt) 
+    assert_equal( ""      , browser.image(:index, 1).alt) 
     assert_equal('square_image', browser.image(:id, 'square').title)
     
     # TODO: to string tests -- output should be verified!
     browser.image(:name  , "circle").to_s
-    browser.image(:index , 2).to_s
+    browser.image(:index , 1).to_s
   end
   
   def test_image_iterator
@@ -123,7 +123,7 @@ class TC_Images < Test::Unit::TestCase
     assert_equal("square", browser.images[2].id )
     assert_match(/square/, browser.images[2].src )
     
-    index = 1
+    index = 0
     browser.images.each do |i|
       assert_equal( browser.image(:index, index).id , i.id )
       assert_equal( browser.image(:index, index).name , i.name )
@@ -133,7 +133,7 @@ class TC_Images < Test::Unit::TestCase
       
       index += 1
     end
-    assert_equal(index - 1 , browser.images.length)
+    assert_equal(index, browser.images.length)
   end
   
   def test_save_local_image

data/unittests/index_specifier_test.rb

@@ -0,0 +1,32 @@
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_BaseIndex < Test::Unit::TestCase
+  include Watir::Exception
+  
+  def setup
+    goto_page "multiple_specifiers.html"
+  end
+
+  def test_default_index
+    assert "one", browser.table.row.cell.class_name
+    assert "testcell", browser.table.row.cell.name
+  end
+
+  def test_zero_based_indexing
+    assert "one", browser.button(:index => 0).class_name
+    assert "two", browser.button(:index => 1).class_name    
+
+    Watir::IE.zero_based_indexing = false
+
+    assert "one", browser.button(:index => 1).class_name
+    assert "two", browser.button(:index => 2).class_name    
+
+    Watir::IE.zero_based_indexing = true
+
+    assert "one", browser.button(:index => 0).class_name
+    assert "two", browser.button(:index => 1).class_name    
+  end
+
+end
+

data/unittests/js_events_test.rb

@@ -9,17 +9,17 @@ class TC_JSEvents < Test::Unit::TestCase
   end
 
   def test_keyboard_event
-    browser.text_field(:index, 1).fire_event("onkeyup")
+    browser.text_field(:index, 0).fire_event("onkeyup")
     assert(browser.div(:id, 'event_name').text == 'onkeyup')
   end
 
   def test_mouse_event
-    browser.text_field(:index, 1).fire_event("onmouseup")
+    browser.text_field(:index, 0).fire_event("onmouseup")
     assert(browser.div(:id, 'event_name').text == 'onmouseup')
   end
 
   def test_html_event
-    browser.select_list(:index, 1).fire_event("onchange")
+    browser.select_list(:index, 0).fire_event("onchange")
     assert(browser.div(:id, 'event_name').text == 'onchange')
   end
 

data/unittests/links_multi_test.rb

@@ -28,7 +28,7 @@ class TC_Links_Multi < Test::Unit::TestCase
   end
   
   def test_class_and_index
-    assert_match(/papa.html/, browser.link(:class => 'Papa', :index => 2).href)
+    assert_match(/papa.html/, browser.link(:class => 'Papa', :index => 1).href)
   end  
 
   def test_not_found_single
@@ -40,9 +40,9 @@ class TC_Links_Multi < Test::Unit::TestCase
   
   def test_not_found_with_multi
     exception = assert_raise(UnknownObjectException) do
-      browser.link(:class => 'Missing', :index => 2).href
+      browser.link(:class => 'Missing', :index => 1).href
     end
-    assert_equal('Unable to locate element, using {:class=>"Missing", :index=>2}', exception.message)
+    assert_equal('Unable to locate element, using {:class=>"Missing", :index=>1}', exception.message)
   end
   
-end
+end

data/unittests/links_test.rb

@@ -70,7 +70,7 @@ class TC_Links < Test::Unit::TestCase
     assert( browser.text.include?("Links3-Pass") ) 
   end
   def test_link3_click        
-    browser.link(:index, 1).click
+    browser.link(:index, 0).click
     assert( browser.text.include?("Links2-Pass") ) 
   end
   def test_link4_click        
@@ -87,28 +87,28 @@ class TC_Links < Test::Unit::TestCase
     assert_raises(UnknownObjectException) { browser.link(:index, 199).type }  
     assert_raises(UnknownObjectException) { browser.link(:index, 199).class_name }  
     
-    assert_match(/links2/ ,browser.link(:index, 1).href )
-    assert_equal(""      , browser.link(:index, 1).value)
-    assert_equal("test1" , browser.link(:index, 1).innerText )
-    assert_equal(""      , browser.link(:index, 1).name )
-    assert_equal(""      , browser.link(:index, 1).id )
-    assert_equal(false   , browser.link(:index, 1).disabled )  
-    assert_equal(""      , browser.link(:index, 1).class_name)
-    assert_equal("link_class_1"      , browser.link(:index, 2).class_name)
+    assert_match(/links2/ ,browser.link(:index, 0).href )
+    assert_equal(""      , browser.link(:index, 0).value)
+    assert_equal("test1" , browser.link(:index, 0).innerText )
+    assert_equal(""      , browser.link(:index, 0).name )
+    assert_equal(""      , browser.link(:index, 0).id )
+    assert_equal(false   , browser.link(:index, 0).disabled )  
+    assert_equal(""      , browser.link(:index, 0).class_name)
+    assert_equal("link_class_1"      , browser.link(:index, 1).class_name)
     
-    assert_equal("link_id"   , browser.link(:index, 6).id )
-    assert_equal("link_name" , browser.link(:index, 7).name )
+    assert_equal("link_id"   , browser.link(:index, 5).id )
+    assert_equal("link_name" , browser.link(:index, 6).name )
     
-    assert_equal("" , browser.link(:index, 7).title)
+    assert_equal("" , browser.link(:index, 6).title)
     
-    assert_equal("link_title" , browser.link(:index, 8).title)
+    assert_equal("link_title" , browser.link(:index, 7).title)
   end
   
   def test_link_iterator
     assert_equal(9, browser.links.length )
-    assert_equal("Link Using a name" , browser.links[7].innerText)
+    assert_equal("Link Using a name" , browser.links[6].innerText)
     
-    index = 1
+    index = 0
     browser.links.each do |link|
       assert_equal(browser.link(:index, index).href      , link.href )
       assert_equal(browser.link(:index, index).id        , link.id )
@@ -132,14 +132,14 @@ class TC_Frame_Links < Test::Unit::TestCase
   end
   
   def test_links_in_frames
-    assert(browser.frame("linkFrame").link(:text, "test1").exists?)   
-    assert_false(browser.frame("linkFrame").link(:text, "missing").exists?)   
+    assert(browser.frame(:name => "linkFrame").link(:text, "test1").exists?)   
+    assert_false(browser.frame(:name => "linkFrame").link(:text, "missing").exists?)   
     
-    assert_raises(UnknownObjectException, "UnknownObjectException  was supposed to be thrown" ) { browser.frame("linkFrame").link(:index, 199).href }  
-    assert_match(/links2/, browser.frame("linkFrame").link(:index, 1).href)
+    assert_raises(UnknownObjectException, "UnknownObjectException  was supposed to be thrown" ) { browser.frame(:name => "linkFrame").link(:index, 199).href }  
+    assert_match(/links2/, browser.frame(:name => "linkFrame").link(:index, 0).href)
     
     count =0
-    browser.frame("linkFrame").links.each do |l|
+    browser.frame(:name => "linkFrame").links.each do |l|
       count+=1
     end
     

data/unittests/lists_test.rb

@@ -12,7 +12,7 @@ class Lists_Tests < Watir::TestCase
     assert(browser.li(:id, 'list2').exists?)
     assert(browser.li(:id, 'list3').exists?)    
     assert(browser.li(:id, 'ordered1').exists?)    
-    assert_equal('Coffee', browser.li(:index, 1).text)
+    assert_equal('Coffee', browser.li(:index, 0).text)
   end
 
   def test_list_item_exists_by_name

data/unittests/map_test.rb

@@ -87,7 +87,7 @@ class Map_Tests < Watir::TestCase
   end
   
   def test_areas
-    assert_equal(3, browser.map(:index, 2).areas.length)
+    assert_equal(3, browser.map(:index, 1).areas.length)
   end
   
   def assert_contains_text text

data/unittests/multiple_specifiers_test.rb

@@ -0,0 +1,29 @@
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_MultipleSpecifiers < Test::Unit::TestCase
+  include Watir::Exception
+  
+  def setup
+    goto_page "multiple_specifiers.html"
+  end
+
+  %w[form table cell row button file_field text_field
+     hidden select_list checkbox radio link image element div].each do |element|
+    class_eval %Q{
+      def test_#{element} 
+        assert "one", browser.#{element}(:name => "test#{element}", :class => "one").class_name
+        assert "two", browser.#{element}(:name => "test#{element}", :class => "two").class_name
+        assert_raises(UnknownObjectException) {browser.#{element}(:name => "nonexistent", :class => "one").class_name}      
+      end
+    }
+  end
+
+  def test_frame
+    goto_page "frame_buttons.html"
+    assert "buttons1.html", browser.frame(:name => /buttonFrame/, :src => "buttons1.html").src
+    assert "blankpage.html", browser.frame(:name => /buttonFrame/, :src => "blankpage.html").src
+    assert_raises(UnknownObjectException) {browser.frame(:name => "nonexistent", :src => "buttons1.html").src}      
+  end
+
+end

data/unittests/no_wait_test.rb

@@ -4,7 +4,7 @@ require 'unittests/setup'
 class TC_No_Wait_Commands < Test::Unit::TestCase
   def test_fire_event_no_wait
     goto_page "javascriptevents.html"
-    browser.text_field(:index, 1).fire_event_no_wait("onkeyup")
+    browser.text_field(:index, 0).fire_event_no_wait("onkeyup")
     assert_nothing_raised{
       Watir::Wait.until {browser.div(:id, 'event_name').text == 'onkeyup'}
     }
@@ -25,4 +25,4 @@ class TC_No_Wait_Commands < Test::Unit::TestCase
       Watir::Wait.until {browser.select_list(:name , 'sel1').selected_options.first == 'Option 1'}
     }
   end
-end
+end

data/unittests/pagecontainstext_test.rb

@@ -64,6 +64,6 @@ class TC_contains_text_in_frame < Test::Unit::TestCase
     goto_page "frame_links.html"
   end        
   def test_in_frame
-    assert browser.frame('linkFrame').contains_text('The button is really a link')
+    assert browser.frame(:name => 'linkFrame').contains_text('The button is really a link')
   end
-end
+end

data/unittests/parent_child_test.rb

@@ -26,7 +26,7 @@ class TC_Relative < Test::Unit::TestCase
     
   tag_method :test_before_and_after, :fails_on_firefox
   def test_before_and_after
-    link = browser.link(:class => 'addtocart', :index => 2)
+    link = browser.link(:class => 'addtocart', :index => 1)
     assert_equal 'http://localhost:3000/store/add_to_cart/12', link.href  
     assert(link.after?(@headline))
     assert(@headline.before?(link))
@@ -41,4 +41,4 @@ class TC_Relative < Test::Unit::TestCase
     assert_equal 'http://localhost:3000/store/add_to_cart/12', link.href  
   end
     
-end
+end

data/unittests/pre_test.rb

@@ -15,7 +15,7 @@ class TC_Pre < Test::Unit::TestCase
   
   def test_Pre_Exists
     assert_false( browser.pre( :index, 33 ).exists? )
-    assert( browser.pre( :index, 3 ).exists? )
+    assert( browser.pre( :index, 2 ).exists? )
     
     assert( browser.pre( :id, '1' ).exists? )
     assert( browser.pre( :id, /[3-9]/ ).exists? )
@@ -27,25 +27,25 @@ class TC_Pre < Test::Unit::TestCase
   end
     
   def test_simple_access
-    pre = browser.pre( :index, 1 )
+    pre = browser.pre( :index, 0 )
     assert( pre.text.include?( "simple pre space" ) )
     assert_false( pre.text.include?( "A second block" ) )
     
-    pre = browser.pre( :index, 2 )
+    pre = browser.pre( :index, 1 )
     assert( pre.text.include?( "A second block" ) )
     assert_false( pre.text.include?( "this is the last block" ) )
   end
 
   tag_method :test_embedded_spaces, :fails_on_firefox # http://jira.openqa.org/browse/WTR-267
   def test_embedded_spaces
-    pre = browser.pre( :index, 3 )
+    pre = browser.pre( :index, 2 )
     assert( pre.text.include?( "continue    to work" ) )
     assert_false( pre.text.include?( "Pre Tag Test" ) )
   end
 
   tag_method :test_html, :fails_on_firefox # http://jira.openqa.org/browse/WTR-260
   def test_html
-    pre = browser.pre(:index, 1)
+    pre = browser.pre(:index, 0)
     assert( pre.html.gsub('"','').include?( "id=1 name=1" ) )
   end
   

data/unittests/radios_test.rb

@@ -27,7 +27,7 @@ class TC_Radios < Test::Unit::TestCase
   def test_Radio_Enabled
     assert_raises(UnknownObjectException, "UnknownObjectException was supposed to be thrown" ) {   browser.radio(:name, "noName").enabled?  }  
     assert_raises(UnknownObjectException, "UnknownObjectException was supposed to be thrown" ) {   browser.radio(:id, "noName").enabled?  }  
-    assert_raises(UnknownObjectException, "UnknownObjectException was supposed to be thrown" ) {   browser.radio(:name, "box4" , 6).enabled?  }  
+    assert_raises(UnknownObjectException, "UnknownObjectException was supposed to be thrown" ) {   browser.radio(:name => "box4", :value => 6).enabled?  }  
     
     assert_false(browser.radio(:name, "box2").enabled?)   
     assert(browser.radio(:id, "box5").enabled?)   
@@ -44,29 +44,29 @@ class TC_Radios < Test::Unit::TestCase
     assert_false(browser.button(:value , "foo").enabled?)
     
     # first click the button is enabled and the radio is set
-    browser.radio(:name, "box5", 1).set
-    assert(browser.radio(:name, "box5",1).isSet?)
-    assert(browser.radio(:name, "box5",1).checked?)    
+    browser.radio(:name => "box5", :value => 1).set
+    assert(browser.radio(:name => "box5", :value => 1).isSet?)
+    assert(browser.radio(:name => "box5", :value => 1).checked?)    
     assert(browser.button(:value, "foo").enabled?)
     
     # second click the button is disabled and the radio is still set
-    browser.radio(:name, "box5", 1).set
-    assert(browser.radio(:name, "box5",1).isSet?)
-    assert(browser.radio(:name, "box5",1).checked?)    
+    browser.radio(:name => "box5", :value => 1).set
+    assert(browser.radio(:name => "box5", :value => 1).isSet?)
+    assert(browser.radio(:name => "box5", :value => 1).checked?)    
     assert_false(browser.button(:value, "foo").enabled?)
     
     # third click the button is enabled and the radio is still set
-    browser.radio(:name, "box5", 1).set
-    assert(browser.radio(:name, "box5", 1).isSet?)
-    assert(browser.radio(:name, "box5", 1).checked?)
+    browser.radio(:name => "box5", :value => 1).set
+    assert(browser.radio(:name => "box5", :value => 1).isSet?)
+    assert(browser.radio(:name => "box5", :value => 1).checked?)
     assert(browser.button(:value, "foo").enabled?)
     
     # click the radio with a value of 2 , button is disabled and the radio is still set
-    browser.radio(:name, "box5", 2).set
-    assert_false(browser.radio(:name, "box5", 1).isSet?)
-    assert_false(browser.radio(:name, "box5", 1).checked?)    
-    assert(browser.radio(:name, "box5", 2).isSet?)
-    assert(browser.radio(:name, "box5", 2).checked?)    
+    browser.radio(:name => "box5", :value => 2).set
+    assert_false(browser.radio(:name => "box5", :value => 1).isSet?)
+    assert_false(browser.radio(:name => "box5", :value => 1).checked?)    
+    assert(browser.radio(:name => "box5", :value => 2).isSet?)
+    assert(browser.radio(:name => "box5", :value => 2).checked?)    
     assert_false(browser.button(:value, "foo").enabled?)
   end
   
@@ -76,14 +76,14 @@ class TC_Radios < Test::Unit::TestCase
     assert_false(browser.radio(:name, "box1").isSet?)   
     assert( browser.radio(:name, "box3").isSet?)   
     assert_false(browser.radio(:name, "box2").isSet?)   
-    assert( browser.radio(:name, "box4", 1).isSet?)   
-    assert_false(browser.radio(:name, "box4", 2).isSet?)  
+    assert( browser.radio(:name => "box4", :value => 1).isSet?)   
+    assert_false(browser.radio(:name => "box4", :value => 2).isSet?)  
 
     assert_false(browser.radio(:name, "box1").checked?)   
     assert( browser.radio(:name, "box3").checked?)   
     assert_false(browser.radio(:name, "box2").checked?)   
-    assert( browser.radio(:name, "box4", 1).checked?)   
-    assert_false(browser.radio(:name, "box4", 2).checked?)   
+    assert( browser.radio(:name => "box4", :value => 1).checked?)   
+    assert_false(browser.radio(:name => "box4", :value => 2).checked?)   
   end
   
   def test_radio_clear
@@ -98,8 +98,8 @@ class TC_Radios < Test::Unit::TestCase
     browser.radio(:name, "box3").clear
     assert_false(browser.radio(:name, "box3").isSet?)   
     
-    browser.radio(:name, "box4" , 1).clear
-    assert_false(browser.radio(:name, "box4" , 1).isSet?)   
+    browser.radio(:name => "box4", :value => 1).clear
+    assert_false(browser.radio(:name => "box4", :value => 1).isSet?)   
   end
   
   def test_radio_getState
@@ -109,8 +109,8 @@ class TC_Radios < Test::Unit::TestCase
     assert_equal( true , browser.radio(:name, "box3").getState)   
     
     # radioes that have the same name but different values
-    assert_equal( false , browser.radio(:name, "box4" , 2).getState )   
-    assert_equal( true , browser.radio(:name, "box4" , 1).getState)   
+    assert_equal( false , browser.radio(:name => "box4", :value => 2).getState )   
+    assert_equal( true , browser.radio(:name => "box4", :value => 1).getState)   
   end
   
   def test_radio_set
@@ -124,8 +124,8 @@ class TC_Radios < Test::Unit::TestCase
     assert(browser.radio(:name, "box3").isSet?)   
     
     # radioes that have the same name but different values
-    browser.radio(:name, "box4" , 3).set
-    assert(browser.radio(:name, "box4" , 3).isSet?)   
+    browser.radio(:name => "box4", :value => 3).set
+    assert(browser.radio(:name => "box4", :value => 3).isSet?)   
   end
   
   def test_radio_properties
@@ -136,28 +136,28 @@ class TC_Radios < Test::Unit::TestCase
     assert_raises(UnknownObjectException, "UnknownObjectException  was supposed to be thrown" ) {   browser.radio(:index, 199).disabled }  
     assert_raises(UnknownObjectException, "UnknownObjectException  was supposed to be thrown" ) {   browser.radio(:index, 199).type }  
     
-    assert_equal("on"   ,    browser.radio(:index, 1).value)  
-    assert_equal("box1" ,    browser.radio(:index, 1).name )  
-    assert_equal(""     ,    browser.radio(:index, 1).id )  
-    assert_equal("radio",    browser.radio(:index, 1).type )  
+    assert_equal("on"   ,    browser.radio(:index, 0).value)  
+    assert_equal("box1" ,    browser.radio(:index, 0).name )  
+    assert_equal(""     ,    browser.radio(:index, 0).id )  
+    assert_equal("radio",    browser.radio(:index, 0).type )  
     
-    assert_equal( false, browser.radio(:index, 1).disabled )
-    assert_equal( true,  browser.radio(:index, 3).disabled )
+    assert_equal( false, browser.radio(:index, 0).disabled )
+    assert_equal( true,  browser.radio(:index, 2).disabled )
     
-    assert_equal("box5"  ,    browser.radio(:index, 2).id )  
-    assert_equal(""      ,    browser.radio(:index, 2).name )  
+    assert_equal("box5"  ,    browser.radio(:index, 1).id )  
+    assert_equal(""      ,    browser.radio(:index, 1).name )  
     
-    assert_equal("box4-value5", browser.radio(:name , "box4" , 5 ).title  )
-    assert_equal("", browser.radio(:name , "box4" , 4 ).title  )
+    assert_equal("box4-value5", browser.radio(:name => "box4", :value => 5).title  )
+    assert_equal("", browser.radio(:name => "box4", :value => 4).title  )
   end
   
   def test_radio_iterators
     assert_equal(13, browser.radios.length)
-    assert_equal("box5" , browser.radios[2].id )
-    assert_equal(true ,  browser.radios[3].disabled )
-    assert_equal(false ,  browser.radios[1].disabled )
+    assert_equal("box5" , browser.radios[1].id )
+    assert_equal(true ,  browser.radios[2].disabled )
+    assert_equal(false ,  browser.radios[0].disabled )
     
-    index = 1
+    index = 0
     browser.radios.each do |r|
       assert_equal( browser.radio(:index, index).name , r.name )
       assert_equal( browser.radio(:index, index).id , r.id )
@@ -165,30 +165,11 @@ class TC_Radios < Test::Unit::TestCase
       assert_equal( browser.radio(:index, index).disabled , r.disabled )
       index+=1
     end
-    assert_equal(index -1, browser.radios.length)
+    assert_equal(index, browser.radios.length)
   end
   
   # test radio buttons that have a string as a value
   def test_value_string
-    tea = browser.radio(:name, 'box6', 'Tea')
-    milk = browser.radio(:name, 'box6', 'Milk')
-    
-    assert(tea.exists?)
-    assert(milk.exists?)
-
-    milk.set
-    assert(milk.isSet?)   
-    assert_false(tea.isSet?)   
-
-    tea.set
-    assert_false(milk.isSet?)   
-    assert(tea.isSet?)   
-
-    tea.clear
-    assert_false(tea.isSet?)
-  end
-
-  def test_value_specified
     tea = browser.radio(:name => 'box6', :value => 'Tea')
     milk = browser.radio(:name => 'box6', :value => 'Milk')
     
@@ -206,6 +187,6 @@ class TC_Radios < Test::Unit::TestCase
     tea.clear
     assert_false(tea.isSet?)
   end
-  
+
 end