watir 1.4.1 → 1.5.2

data/unittests/div_xpath_test.rb

@@ -0,0 +1,96 @@
+# feature tests for Divs, Spans and P's
+# revision: $Revision: 962 $
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') if $0 == __FILE__
+require 'unittests/setup'
+
+class TC_Divs_XPath < Test::Unit::TestCase
+  include Watir
+  
+  def setup
+    $ie.goto($htmlRoot + "div.html")
+  end
+  
+  def test_divs
+    assert_raises(UnknownObjectException) {$ie.div(:xpath , "//div[@id='div77']/").click }
+    assert_raises(UnknownObjectException) {$ie.div(:xpath , "//div[@title='div77']/").click }
+    
+    assert($ie.text_field(:xpath, "//input[@name='text1']/").verify_contains("0") )  
+    $ie.div(:xpath , "//div[@id='div3']/").click
+    assert($ie.text_field(:xpath, "//input[@name='text1']/").verify_contains("1") )  
+    $ie.div(:xpath , "//div[@id='div4']/").click
+    assert($ie.text_field(:xpath, "//input[@name='text1']/").verify_contains("0") )  
+  end
+  
+  def test_div_properties
+    assert_raises(UnknownObjectException) {$ie.div(:xpath , "//div[@id='div77']/").text }
+    assert_raises(UnknownObjectException) {$ie.div(:xpath , "//div[@title='div77']/").text }
+    
+    assert_equal("This div has an onClick that increments text1", 
+    $ie.div(:xpath , "//div[@id='div3']/").text.strip )
+    assert_equal("This text is in a div with an id of div1 and title of test1",   
+    $ie.div(:xpath , "//div[@title='Test1']/").text.strip )
+    
+    assert_raises(UnknownObjectException) {$ie.div(:xpath , "//div[@id='div77']/").class_name }
+    assert_equal("blueText" ,   $ie.div(:xpath , "//div[@id='div2']/").class_name )
+    assert_equal("" ,   $ie.div(:xpath , "//div[@id='div1']/").class_name )
+  end
+  
+  def test_objects_in_div
+    assert($ie.div(:xpath , "//div[@id='buttons1']/").button(:index,1).exists? )
+    assert(!$ie.div(:xpath , "//div[@id='buttons1']/").button(:index,3).exists? )
+    assert($ie.div(:xpath , "//div[@id='buttons1']/").button(:name,'b1').exists? )
+    
+    assert($ie.div(:xpath , "//div[@id='buttons2']/").button(:index,1).exists? )
+    assert($ie.div(:xpath , "//div[@id='buttons2']/").button(:index,2).exists? )
+    assert(!$ie.div(:xpath , "//div[@id='buttons1']/").button(:index,3).exists? )
+    
+    $ie.div(:xpath , "//div[@id='buttons1']/").button(:index,1).click
+    
+    assert_equal( 'button1' ,   $ie.div(:xpath , "//div[@id='text_fields1']/").text_field(:index,1).value)
+    
+    assert_equal( 3 , $ie.div(:xpath , "//div[@id='text_fields1']/").text_fields.length )
+  end
+  
+  def test_span_properties
+    assert_raises(UnknownObjectException) {$ie.span(:xpath , "//span[@id='span77']/").text }
+    assert_raises(UnknownObjectException) {$ie.span(:xpath , "//span[@title='span77']/").text }
+    
+    assert_equal("This span has an onClick that increments text2" ,   $ie.span(:xpath , "//span[@id='span3']/").text.strip )
+    assert_equal("This text is in a span with an id of span1 and title of test2" ,   $ie.span(:xpath , "//span[@title='Test2']/").text.strip )
+    
+    assert_raises(UnknownObjectException) {$ie.span(:xpath , "//span[@id='span77']/").class_name }
+    assert_equal("blueText" ,   $ie.span(:xpath , "//span[@id='span2']/").class_name )
+    assert_equal("" ,   $ie.span(:xpath , "//span[@id='span1']/").class_name )
+  end
+  
+  def test_objects_in_span
+    assert($ie.span(:xpath , "//span[@id='buttons1']/").button(:index,1).exists? )
+    assert(!$ie.span(:xpath , "//span[@id='buttons1']/").button(:index,3).exists? )
+    assert($ie.span(:xpath , "//span[@id='buttons1']/").button(:name,'b1').exists? )
+    
+    assert($ie.span(:xpath , "//span[@id='buttons2']/").button(:index,1).exists? )
+    assert($ie.span(:xpath , "//span[@id='buttons2']/").button(:index,2).exists? )
+    assert(!$ie.span(:xpath , "//span[@id='buttons1']/").button(:index,3).exists? )
+    
+    $ie.span(:xpath , "//span[@id='buttons1']/").button(:index,1).click
+    
+    assert_equal( 'button1' ,   $ie.span(:xpath , "//span[@id='text_fields1']/").text_field(:index,1).value)
+    
+    assert_equal( 3 , $ie.span(:xpath , "//span[@id='text_fields1']/").text_fields.length )
+  end
+  
+  def test_p
+    assert($ie.p(:xpath , "//p[@id='number1']/").exists?)
+    assert($ie.p(:xpath , "//p[@title='test_3']/").exists?)
+    
+    assert(!$ie.p(:xpath , "//p[@id='missing']/").exists?)
+    assert(!$ie.p(:xpath , "//p[@title='test_55']/").exists?)
+    
+    assert_raises( UnknownObjectException) {$ie.p(:xpath , "//p[@id='missing']/").class_name }
+    assert_raises( UnknownObjectException) {$ie.p(:xpath , "//p[@id='missing']/").text }
+    assert_raises( UnknownObjectException) {$ie.p(:xpath , "//p[@id='missing']/").title }
+    assert_raises( UnknownObjectException) {$ie.p(:xpath , "//p[@id='missing']/").to_s }
+    assert_raises( UnknownObjectException) {$ie.p(:xpath , "//p[@id='missing']/").disabled }        
+  end
+end

data/unittests/errorchecker_test.rb

@@ -1,29 +1,29 @@
 # feature tests for Goto
-# revision: $Revision: 1.2 $
+# revision: $Revision: 958 $
 
 $LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') if $0 == __FILE__
 require 'unittests/setup'
 
 class TC_error_checker< Test::Unit::TestCase
-    include Watir
-
-    def goto_page(page)
-        $ie.goto($htmlRoot + page)
-    end
-
-    def test_simple_checker
-        button_checker = Proc.new{
-            |ie|  raise RuntimeError, "text 'buttons' was missing"  if !ie.pageContainsText(/buttons/)
-        }
-
-        $ie.add_checker(button_checker )
-        assert_raises( RuntimeError ) { goto_page('forms3.html') }
-        assert_nothing_raised { goto_page('buttons1.html') }
-
-        $ie.disable_checker( button_checker )
-        assert_nothing_raised { goto_page('forms3.html') }
-
-    end
-
-
+  include Watir
+  
+  def goto_page(page)
+    $ie.goto($htmlRoot + page)
+  end
+  
+  def test_simple_checker
+    button_checker = Proc.new{
+      |ie|  raise RuntimeError, "text 'buttons' was missing"  if !ie.pageContainsText(/buttons/)
+    }
+    
+    $ie.add_checker(button_checker )
+    assert_raises( RuntimeError ) { goto_page('forms3.html') }
+    assert_nothing_raised { goto_page('buttons1.html') }
+    
+    $ie.disable_checker( button_checker )
+    assert_nothing_raised { goto_page('forms3.html') }
+    
+  end
+  
+  
 end

data/unittests/filefield_test.rb

@@ -1,35 +1,42 @@
-# feature tests for TextArea Fields
-# revision: $Revision: 1.3 $
+# feature tests for file Fields
+# revision: $Revision: 1138 $
 
 $LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') if $0 == __FILE__
 require 'unittests/setup'
 
 class TC_FileField < Test::Unit::TestCase
   include Watir
-
-  def gotoPage()
-	$ie.goto($htmlRoot + "fileupload.html")
+  
+  def goto_page
+    $ie.goto($htmlRoot + "fileupload.html")
   end
+  
+  def test_file_field_Exists
+    goto_page
 
-  def test_fileField_Exists
-	gotoPage()
-	#test for existance of 4 file area
-	assert($ie.fileField(:name,"file1").exists?)
-	assert($ie.fileField(:id,"file2").exists?)
-	#test for missing 
-	assert_false($ie.fileField(:name, "missing").exists?)   
-	assert_false($ie.fileField(:name,"totallybogus").exists?)
-	#pop one open and put something in it.
-	$ie.fileField(:name,"file1").set($htmlRoot + "fileupload.html")	
-	#click the upload button
-	$ie.button(:name,"upload").click
+    # test for existance of 4 file area
+    assert($ie.file_field(:name,"file1").exists?)
+    assert($ie.file_field(:id,"file2").exists?)
 
-	assert($ie.contains_text("PASS"))	
-    end
+    # test for missing 
+    assert(!$ie.file_field(:name, "missing").exists?)   
+    assert(!$ie.file_field(:name,"totallybogus").exists?)
 
-    def test_iterator
-        gotoPage()
-        assert_equal(6, $ie.file_fields.length)
-    end
+    # pop one open and put something in it.
+    file = $htmlRoot + "fileupload.html"
+    file.gsub! 'file://', ''
+    file.gsub! '/', '\\'
+    $ie.file_field(:name,"file1").set(file)	
+    assert_equal file, $ie.file_field(:name,"file1").value
 
+    # click the upload button
+    $ie.button(:name,"upload").click
+    assert($ie.text.include?("PASS"))	
+  end
+  
+  def test_iterator
+    goto_page
+    assert_equal(6, $ie.file_fields.length)
+  end
+  
 end

data/unittests/filefield_xpath_test.rb

@@ -0,0 +1,35 @@
+# feature tests for TextArea Fields
+# revision: $Revision: 963 $
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') if $0 == __FILE__
+require 'unittests/setup'
+
+class TC_FileField_XPath < Test::Unit::TestCase
+  include Watir
+  
+  def goto_page
+    $ie.goto($htmlRoot + "fileupload.html")
+  end
+  
+  def test_file_field_Exists
+    goto_page
+    #test for existance of 4 file area
+    assert($ie.file_field(:xpath, "//input[@name='file1']/").exists?)
+    assert($ie.file_field(:xpath, "//input[@id='file2']/").exists?)
+    #test for missing 
+    assert(!$ie.file_field(:xpath, "//input[@name='missing']/").exists?)   
+    assert(!$ie.file_field(:xpath, "//input[@name='totallybogus']/").exists?)
+    #pop one open and put something in it.
+    $ie.file_field(:xpath, "//input[@name='file1']/").set($htmlRoot + "fileupload.html")	
+    #click the upload button
+    $ie.button(:xpath, "//input[@name='upload']/").click
+    
+    assert($ie.text.include?("PASS"))	
+  end
+  
+  def test_iterator
+    goto_page
+    assert_equal(6, $ie.file_fields.length)
+  end
+  
+end

data/unittests/form_test.rb

@@ -1,51 +1,66 @@
 # feature tests for Forms
-# revision: $Revision: 1.29 $
+# revision: $Revision: 1079 $
 
 $LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') if $0 == __FILE__
 require 'unittests/setup'
 
-class TC_Forms2 < Test::Unit::TestCase
-    def setup()
-        $ie.goto($htmlRoot + "forms2.html")
-    end
+class TC_Forms2 < Test::Unit::TestCase # Note: there is no TC_Forms1
+  def setup
+    $ie.goto($htmlRoot + "forms2.html")
+  end
+  
+  def test_Form_Exists
+    assert($ie.form(:name, "test2").exists?)   
+    assert(!$ie.form(:name, "missing").exists?)   
     
-    def test_Form_Exists
-        assert($ie.form(:name, "test2").exists?)   
-        assert_false($ie.form(:name, "missing").exists?)   
-        
-        assert($ie.form("test2").exists?)   
-        assert_false($ie.form( "missing").exists?)   
-        
-        assert($ie.form(:index,  1).exists?)   
-        assert_false($ie.form(:index, 88).exists?)   
-        
-        assert($ie.form(:method, "get").exists?)   
-        assert_false($ie.form(:method, "missing").exists?)   
-        
-        assert($ie.form(:action, "pass.html").exists?)   
-        assert_false($ie.form(:action, "missing").exists?)   
-    end
+    assert($ie.form("test2").exists?)   
+    assert(!$ie.form( "missing").exists?)   
+
+    assert($ie.form(:index,  1).exists?)   
+    assert(!$ie.form(:index, 88).exists?)   
+    
+    assert($ie.form(:method, "get").exists?)   
+    assert(!$ie.form(:method, "missing").exists?)   
     
-    def test_ButtonInForm
-        assert($ie.form(:name ,"test2").button(:caption , "Submit").exists?)
-    end     
+    assert($ie.form(:id, 'f2').exists?)   
+    assert(!$ie.form(:id, 'missing').exists?)   
+    
+    assert($ie.form(:action, "pass.html").exists?)   
+    assert(!$ie.form(:action, "missing").exists?)   
+  end
+  
+  def test_ButtonInForm
+    assert($ie.form(:name, "test2").button(:caption , "Submit").exists?)
+  end     
+  
+  # The following tests from bug 2261 
+  def test_form_html 
+    assert_equal("\r\n<FORM id=f2 name=test2 action=pass2.html method=get><BR><INPUT type=submit value=Submit> </FORM>", 
+    $ie.form(:name, 'test2').html)
+  end
+  def test_form_flash
+    assert_nothing_raised{ $ie.form(:name, 'test2').flash }
+  end
+  def test_form_sub_element
+    assert_equal('Click Me', $ie.form(:index, 1).button(:name, 'b1').value)
+  end
 end
 
 require 'unittests/iostring'
 class TC_Form_Display < Test::Unit::TestCase
-    include MockStdoutTestCase                
-    def test_showforms
-        $ie.goto($htmlRoot + "forms2.html")
-        $stdout = @mockout
-        $ie.showForms
-        assert_equal(<<END_OF_MESSAGE, @mockout)
+  include MockStdoutTestCase                
+  def test_showforms
+    $ie.goto($htmlRoot + "forms2.html")
+    $stdout = @mockout
+    $ie.showForms
+    assert_equal(<<END_OF_MESSAGE, @mockout)
 There are 4 forms
 Form name: 
        id: 
    method: get
    action: pass.html
 Form name: test2
-       id: 
+       id: f2
    method: get
    action: pass2.html
 Form name: test3
@@ -57,223 +72,229 @@ Form name: test2
    method: get
    action: pass2.html
 END_OF_MESSAGE
-    end
+  end
 end
 
 class TC_Forms3 < Test::Unit::TestCase
-    def setup()
-        $ie.goto($htmlRoot + "forms3.html")
-    end
+  def setup
+    $ie.goto($htmlRoot + "forms3.html")
+  end
+  
+  # The following tests from bug 2261 
+  def test_p_in_form
+    $ie.form(:name, 'buttonsubmit').p(:index, 1).text
+  end
+  
+  def test_Form_Exists
+    assert($ie.form(:name, "test2").exists?)   
+    assert(!$ie.form(:name, "missing").exists?)   
     
-    def test_Form_Exists
-        assert($ie.form(:name, "test2").exists?)   
-        assert_false($ie.form(:name, "missing").exists?)   
-        
-        assert($ie.form("test2").exists?)   
-        assert_false($ie.form( "missing").exists?)   
-        
-        assert($ie.form(:index,  1).exists?)   
-        assert_false($ie.form(:index, 88).exists?)   
-        
-        assert($ie.form(:method, "get").exists?)   
-        assert_false($ie.form(:method, "missing").exists?)   
-        
-        assert($ie.form(:action, "pass.html").exists?)   
-        assert_false($ie.form(:action, "missing").exists?)   
-    end
-
-    def test_getObject_when_non_watir_object_before_it
-        # test for bug reported by Scott Pack,  http://rubyforge.org/pipermail/wtr-general/2005-June/002223.html
-        assert_equal("check1" , $ie.checkbox(:index,1).name )
-    end
+    assert($ie.form("test2").exists?)   
+    assert(!$ie.form( "missing").exists?)   
     
-    def test_showforms # add verification of output!
-        $ie.showForms
-    end
-
-    def test_reset
-                
-        $ie.text_field(:id, "t1").set("Hello, reset test!")
-        assert_equal($ie.text_field(:id, 't1').getContents, 'Hello, reset test!')
-        
-        $ie.button(:caption, "Reset").click
-        assert_equal("" , $ie.text_field(:id, 't1').getContents )
-        
-        # also verify it works under a form
-        $ie.text_field(:id, "t1").set("reset test - using a form")
-        assert_equal($ie.text_field(:id, 't1').getContents, 'reset test - using a form')
-        
-        $ie.form(:index,2).button(:index,2).click
-        assert_equal("" , $ie.text_field(:id, 't1').getContents )
-
-        # also verify it works under a form, this time using the :id attribute
-        $ie.text_field(:id, "t1").set("reset test - using a form")
-        assert_equal($ie.text_field(:id, 't1').getContents, 'reset test - using a form')
-        
-        $ie.form(:index,2).button(:id,'reset_button').click
-        assert_equal("" , $ie.text_field(:id, 't1').getContents )
+    assert($ie.form(:index,  1).exists?)   
+    assert(!$ie.form(:index, 88).exists?)   
+    
+    assert($ie.form(:method, "get").exists?)   
+    assert(!$ie.form(:method, "missing").exists?)   
+    
+    assert($ie.form(:action, "pass.html").exists?)   
+    assert(!$ie.form(:action, "missing").exists?)   
+  end
+  
+  def test_index_other_element_before_it
+    # test for bug reported by Scott Pack,  http://rubyforge.org/pipermail/wtr-general/2005-June/002223.html
+    assert_equal("check1" , $ie.checkbox(:index,1).name )
+  end
+  
+  def test_reset
+    $ie.text_field(:id, "t1").set("Hello, reset test!")
+    assert_equal($ie.text_field(:id, 't1').getContents, 'Hello, reset test!')
+    
+    $ie.button(:caption, "Reset").click
+    assert_equal("" , $ie.text_field(:id, 't1').getContents )
+    
+    # also verify it works under a form
+    $ie.text_field(:id, "t1").set("reset test - using a form")
+    assert_equal($ie.text_field(:id, 't1').getContents, 'reset test - using a form')
+    
+    $ie.form(:index,2).button(:index,2).click
+    assert_equal("" , $ie.text_field(:id, 't1').getContents )
+    
+    # also verify it works under a form, this time using the :id attribute
+    $ie.text_field(:id, "t1").set("reset test - using a form")
+    assert_equal($ie.text_field(:id, 't1').getContents, 'reset test - using a form')
+    
+    $ie.form(:index,2).button(:id,'reset_button').click
+    assert_equal("" , $ie.text_field(:id, 't1').getContents )
+  end
+  
+  def test_flash1
+    $ie.form(:name ,"test2").button(:caption , "Submit").flash
+  end 
+  
+  def test_objects_with_same_name
+    assert_equal('textfield' ,$ie.text_field( :name , 'g1').value )
+    assert_equal('button'    ,$ie.button(     :name , 'g1').value )
+    assert_equal('1'         ,$ie.checkbox(   :name , 'g1').value )
+    assert_equal('2'         ,$ie.radio(      :name , 'g1').value )
+    
+    assert_equal('textfield' ,$ie.text_field( :name , /g1/).value )
+    assert_equal('button'    ,$ie.button(     :name , /g1/).value )
+    assert_equal('1'         ,$ie.checkbox(   :name , /g1/).value )
+    assert_equal('2'         ,$ie.radio(      :name , /g1/).value )
+    
+    assert_equal('textfield_id' ,$ie.text_field( :id , 'g1').value )
+    assert_equal('button_id'    ,$ie.button(     :id , 'g1').value )
+    assert_equal('1_id'         ,$ie.checkbox(   :id , 'g1').value )
+    assert_equal('2_id'         ,$ie.radio(      :id , 'g1').value )
 
-    end
+    assert_equal('textfield_id' ,$ie.text_field( :id , /g1/).value )
+    assert_equal('button_id'    ,$ie.button(     :id , /g1/).value )
+    assert_equal('1_id'         ,$ie.checkbox(   :id , /g1/).value )
+    assert_equal('2_id'         ,$ie.radio(      :id , /g1/).value )
+  end
+  
+  def test_flash2
+    $ie.button(:value, 'Click Me').flash
+    assert_raises( Watir::UnknownObjectException ) { $ie.text_field( :name , 'g177').flash }
+  end
+  
+  def test_submitWithImage
+    assert( $ie.button(:alt , "submit").exists? )
+    assert( $ie.button(:alt , /sub/).exists? )
+    
+    assert(! $ie.button(:alt , "missing").exists? )
+    assert(! $ie.button(:alt , /missing/).exists? )
+    
+    #assert( $ie.button(:src , "file:///#{$myDir}/html/images/button.jpg").exists? )    # this doesnt work for everybody
+    assert( $ie.button(:src , /button/).exists? )
+    
+    assert(! $ie.button(:src , "missing").exists? )
+    assert(! $ie.button(:src , /missing/).exists? )
+    assert_nothing_raised("raised an exception when it shouldnt have") { $ie.button(:src , /button/).click }
+    
+    assert( $ie.text.include?("PASS") )
+  end
+end
 
+class TC_Forms3_Display < Test::Unit::TestCase
+  include MockStdoutTestCase # BUG in test: output not verified!                
+  def test_show_stuff
+    $ie.goto($htmlRoot + "forms3.html")
+    $stdout = @mockout
+    $ie.showAllObjects
+    puts $ie.getText
+    puts $ie.getHTML
+  end
+end
 
+class TC_Forms4 < Test::Unit::TestCase
+  def setup
+    $ie.goto($htmlRoot + "forms4.html")
+  end
+  
+  def test_find_text_field_ignoring_form
+    assert_equal($ie.text_field(:name, 'name').getContents, 'apple') # should it raise a not-unique error instead?
+  end
+  
+  def test_correct_form_field_is_found_using_form_name
+    assert_equal($ie.form(:name, 'apple_form').text_field(:name, 'name').getContents, 'apple')
+    assert_equal($ie.form(:name, 'banana_form').text_field(:name, 'name').getContents, 'banana')
+  end
+  
+  def test_correct_form_field_is_found_using_form_index
+    assert_equal($ie.form(:index, 1).text_field(:name, 'name').getContents, 'apple')
+    assert_equal($ie.form(:index, 2).text_field(:name, 'name').getContents, 'banana')
+  end
+  
+  def test_using_text_on_form
+    $ie.form(:name, 'apple_form').text_field(:name, 'name').set('strudel')
+    assert_equal($ie.form(:index, 1).text_field(:name, 'name').getContents, 'strudel')
+  end 
+  
+  def test_submit
+    $ie.form(:name, 'apple_form').submit
+    assert( $ie.text.include?("PASS") )
+  end
+end
 
-    def test_flash1
-        $ie.form(:name ,"test2").button(:caption , "Submit").flash
-    end 
-    
-    def test_objects_with_same_name
-        assert_equal('textfield' ,$ie.text_field( :name , 'g1').value )
-        assert_equal('button'    ,$ie.button(    :name , 'g1').value )
-        assert_equal('1'         ,$ie.checkbox(  :name , 'g1').value )
-        assert_equal('2'         ,$ie.radio(     :name , 'g1').value )
-        
-        assert_equal('textfield_id' ,$ie.text_field( :id , 'g1').value )
-        assert_equal('button_id'    ,$ie.button(    :id , 'g1').value )
-        assert_equal('1_id'         ,$ie.checkbox(  :id , 'g1').value )
-        assert_equal('2_id'         ,$ie.radio(     :id , 'g1').value )
-    end
+class TC_Hidden_Fields < Test::Unit::TestCase
+  def setup
+    $ie.goto($htmlRoot + "forms3.html")
+  end
+  
+  def test_hidden
     
-    def test_flash2
-        $ie.button(:value, 'Click Me').flash
-        assert_raises( Watir::UnknownObjectException ) { $ie.text_field( :name , 'g177').flash }
-    end
+    # test using index
+    assert( $ie.hidden(:index,1).exists? )
+    assert( $ie.hidden(:index,2).exists? )
+    assert(! $ie.hidden(:index,3).exists? )
     
-    def test_showElements # add verification!
-        $ie.showAllObjects
-    end
+    $ie.hidden(:index,1).value = 44
+    $ie.hidden(:index,2).value = 55
     
-    def test_showText
-        puts $ie.getText
-    end
+    $ie.button(:value , "Show Hidden").click
     
-    def test_showHTML
-        puts $ie.getHTML
-    end
+    assert_equal("44"  , $ie.text_field(:name , "vis1").value ) 
+    assert_equal("55"  , $ie.text_field(:name , "vis2").value )
     
-    def test_submitWithImage
-        assert( $ie.button(:alt , "submit").exists? )
-        assert( $ie.button(:alt , /sub/).exists? )
-        
-        assert_false( $ie.button(:alt , "missing").exists? )
-        assert_false( $ie.button(:alt , /missing/).exists? )
-        
-        #assert( $ie.button(:src , "file:///#{$myDir}/html/images/button.jpg").exists? )    # this doesnt work for everybody
-        assert( $ie.button(:src , /button/).exists? )
-        
-        assert_false( $ie.button(:src , "missing").exists? )
-        assert_false( $ie.button(:src , /missing/).exists? )
-        assert_nothing_raised("raised an exception when it shouldnt have") { $ie.button(:src , /button/).click }
-        
-        assert( $ie.contains_text("PASS") )
-    end
-end
-
-class TC_Forms4 < Test::Unit::TestCase
-    def setup()
-        $ie.goto($htmlRoot + "forms4.html")
-    end
+    # test using name and ID
+    assert( $ie.hidden(:name ,"hid1").exists? )
+    assert( $ie.hidden(:id,"hidden_1").exists? )
+    assert(! $ie.hidden(:name,"hidden_44").exists? )
+    assert(! $ie.hidden(:id,"hidden_55").exists? )
     
-    def test_find_text_field_ignoring_form
-        assert_equal($ie.text_field(:name, 'name').getContents, 'apple') # should it raise a not-unique error instead?
-    end
+    $ie.hidden(:name ,"hid1").value = 444
+    $ie.hidden(:id,"hidden_1").value = 555
     
-    def test_correct_form_field_is_found_using_form_name
-        assert_equal($ie.form(:name, 'apple_form').text_field(:name, 'name').getContents, 'apple')
-        assert_equal($ie.form(:name, 'banana_form').text_field(:name, 'name').getContents, 'banana')
-    end
+    $ie.button(:value , "Show Hidden").click
     
-    def test_correct_form_field_is_found_using_form_index
-        assert_equal($ie.form(:index, 1).text_field(:name, 'name').getContents, 'apple')
-        assert_equal($ie.form(:index, 2).text_field(:name, 'name').getContents, 'banana')
-    end
+    assert_equal("444"  , $ie.text_field(:name , "vis1").value ) 
+    assert_equal("555"  , $ie.text_field(:name ,"vis2").value )
     
-    def test_using_text_on_form
-        $ie.form(:name, 'apple_form').text_field(:name, 'name').set('strudel')
-        assert_equal($ie.form(:index, 1).text_field(:name, 'name').getContents, 'strudel')
-    end 
+    #  test the over-ridden append method
+    $ie.hidden(:name ,"hid1").append("a")
+    $ie.button(:value , "Show Hidden").click
+    assert_equal("444a"  , $ie.text_field(:name , "vis1").value ) 
+    assert_equal("555"  , $ie.text_field(:name ,"vis2").value )
     
-    def test_submit
-        $ie.form(:name, 'apple_form').submit
-        assert( $ie.contains_text("PASS") )
-    end
-end
-
-class TC_Hidden_Fields < Test::Unit::TestCase
-    def setup
-        $ie.goto($htmlRoot + "forms3.html")
-    end
+    #  test the over-ridden clear method
+    $ie.hidden(:name ,"hid1").clear
+    $ie.button(:value , "Show Hidden").click
+    assert_equal(""  , $ie.text_field(:name , "vis1").value ) 
+    assert_equal("555"  , $ie.text_field(:name ,"vis2").value )
+    
+    # test using a form
+    assert( $ie.form(:name , "has_a_hidden").hidden(:name ,"hid1").exists? )
+    assert( $ie.form(:name , "has_a_hidden").hidden(:id,"hidden_1").exists? )
+    assert(! $ie.form(:name , "has_a_hidden").hidden(:name,"hidden_44").exists? )
+    assert(! $ie.form(:name , "has_a_hidden").hidden(:id,"hidden_55").exists? )
+    
+    $ie.form(:name , "has_a_hidden").hidden(:name ,"hid1").value = 222
+    $ie.form(:name , "has_a_hidden").hidden(:id,"hidden_1").value = 333
     
-    def test_hidden
-        
-        # test using index
-        assert( $ie.hidden(:index,1).exists? )
-        assert( $ie.hidden(:index,2).exists? )
-        assert_false( $ie.hidden(:index,3).exists? )
-        
-        $ie.hidden(:index,1).value = 44
-        $ie.hidden(:index,2).value = 55
-        
-        $ie.button(:value , "Show Hidden").click
-        
-        assert_equal("44"  , $ie.text_field(:name , "vis1").value ) 
-        assert_equal("55"  , $ie.text_field(:name , "vis2").value )
-                        
-        # test using name and ID
-        assert( $ie.hidden(:name ,"hid1").exists? )
-        assert( $ie.hidden(:id,"hidden_1").exists? )
-        assert_false( $ie.hidden(:name,"hidden_44").exists? )
-        assert_false( $ie.hidden(:id,"hidden_55").exists? )
-        
-        $ie.hidden(:name ,"hid1").value = 444
-        $ie.hidden(:id,"hidden_1").value = 555
-        
-        $ie.button(:value , "Show Hidden").click
-        
-        assert_equal("444"  , $ie.text_field(:name , "vis1").value ) 
-        assert_equal("555"  , $ie.text_field(:name ,"vis2").value )
-                
-        #  test the over-ridden append method
-        $ie.hidden(:name ,"hid1").append("a")
-        $ie.button(:value , "Show Hidden").click
-        assert_equal("444a"  , $ie.text_field(:name , "vis1").value ) 
-        assert_equal("555"  , $ie.text_field(:name ,"vis2").value )
-        
-        #  test the over-ridden clear method
-        $ie.hidden(:name ,"hid1").clear
-        $ie.button(:value , "Show Hidden").click
-        assert_equal(""  , $ie.text_field(:name , "vis1").value ) 
-        assert_equal("555"  , $ie.text_field(:name ,"vis2").value )
-        
-        # test using a form
-        assert( $ie.form(:name , "has_a_hidden").hidden(:name ,"hid1").exists? )
-        assert( $ie.form(:name , "has_a_hidden").hidden(:id,"hidden_1").exists? )
-        assert_false( $ie.form(:name , "has_a_hidden").hidden(:name,"hidden_44").exists? )
-        assert_false( $ie.form(:name , "has_a_hidden").hidden(:id,"hidden_55").exists? )
-        
-        $ie.form(:name , "has_a_hidden").hidden(:name ,"hid1").value = 222
-        $ie.form(:name , "has_a_hidden").hidden(:id,"hidden_1").value = 333
-        
-        $ie.button(:value , "Show Hidden").click
-        
-        assert_equal("222"  , $ie.text_field(:name , "vis1").value ) 
-        assert_equal("333"  , $ie.text_field(:name ,"vis2").value )
-        
-        # iterators
-        assert_equal(2, $ie.hiddens.length)
-        count =1
-        $ie.hiddens.each do |h|
-            case count
-            when 1
-                assert_equal( "", h.id)
-                assert_equal( "hid1", h.name)
-            when 2
-                assert_equal( "", h.name)
-                assert_equal( "hidden_1", h.id)
-            end
-            count+=1
-        end
-        
-        assert_equal("hid1" , $ie.hiddens[1].name )
-        assert_equal("hidden_1" , $ie.hiddens[2].id )
+    $ie.button(:value , "Show Hidden").click
+    
+    assert_equal("222"  , $ie.text_field(:name , "vis1").value ) 
+    assert_equal("333"  , $ie.text_field(:name ,"vis2").value )
+    
+    # iterators
+    assert_equal(2, $ie.hiddens.length)
+    count =1
+    $ie.hiddens.each do |h|
+      case count
+      when 1
+        assert_equal( "", h.id)
+        assert_equal( "hid1", h.name)
+      when 2
+        assert_equal( "", h.name)
+        assert_equal( "hidden_1", h.id)
+      end
+      count+=1
     end
+    
+    assert_equal("hid1" , $ie.hiddens[1].name )
+    assert_equal("hidden_1" , $ie.hiddens[2].id )
+  end
 end