watir 1.6.2 → 1.6.5

data/unittests/images_xpath_test.rb

@@ -1,91 +1,91 @@
-# feature tests for Images
-# revision: $Revision: 1505 $
-
-$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
-require 'unittests/setup'
-require 'ftools'
-require 'webrick'
-require 'watir/cookiemanager'
-
-class TC_Images_XPath < Test::Unit::TestCase
-  include Watir
-  
-  def setup
-    gotoImagePage
-  end
-  
-  def gotoImagePage
-    goto_page "images1.html"
-  end
-  
-  def test_imageExists
-    assert_false( browser.image(:xpath , "//img[@name='missing_name']/").exists?  )
-    assert(       browser.image(:xpath , "//img[@name='circle']/").exists?  )
-    # assert(       browser.image(:name , /circ/ ).exists?  )
-    
-    assert_false( browser.image(:xpath , "//img[@id='missing_id']/").exists?  )
-    assert(       browser.image(:xpath , "//img[@id='square']/").exists?  )
-    # assert(       browser.image(:id , /squ/ ).exists?  )
-    
-    assert_false( browser.image(:xpath , "//img[@src='missingsrc.gif']/").exists?  )
-    
-    # BP -- This fails for me but not for Paul. It doesn't make sense to me that it should pass.  
-    # assert(       browser.image(:src , "file:///#{$myDir}/html/images/triangle.jpg").exists?  )
-    # assert(       browser.image(:src , /triangle/ ).exists?  )
-    
-    assert(       browser.image(:alt , "circle" ).exists?  )
-    # assert(       browser.image(:alt , /cir/ ).exists?  )
-    
-    assert_false(  browser.image(:alt , "triangle" ).exists?  )
-    # assert_false(  browser.image(:alt , /tri/ ).exists?  )
-  end
-  
-  def test_image_click
-    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@name='no_image_with_this']/").click }
-    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@id='no_image_with_this']/").click }
-    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@src='no_image_with_this']/").click}
-    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@alt='no_image_with_this']/").click}
-    
-    # test for bug 1882
-    browser.text_field(:name , "text1").clear
-    browser.button(:value , /Pos/ ).click
-    assert_equal('clicked' , browser.text_field(:name , "text1" ).value )
-    
-    # test for disabled button
-    # assert_false( browser.image(:name , 'disabler_test').disabled )
-    # browser.button(:name , 'disable_img').click
-    
-    # assert( browser.image(:name , 'disabler_test').disabled )
-    # browser.button(:name , 'disable_img').click
-    
-    # browser.image(:src, /button/).click
-    # assert(browser.text.include?("PASS") )
-    
-  end
-  
-  
-  
-  def test_imageHasLoaded
-    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@name='no_image_with_this']/").hasLoaded? }
-    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@id='no_image_with_this']/").hasLoaded? }
-    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@src='no_image_with_this']/").hasLoaded? }
-    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@alt='no_image_with_this']/").hasLoaded? }
-    
-    assert_false( browser.image(:xpath , "//img[@name='themissingimage']/").hasLoaded?  )
-    assert( browser.image(:xpath , "//img[@name='circle']/").hasLoaded?  )
-    
-    assert( browser.image(:xpath , "//img[@alt='circle']/").hasLoaded?  )
-    # assert( browser.image(:alt, /cir/ ).hasLoaded?  )
-  end
-  
-  def test_image_properties
-    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@name='no_image_with_this']/").hasLoaded? }
-    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@id='no_image_with_this']/").hasLoaded? }
-    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@src='no_image_with_this']/").hasLoaded? }
-    
-    # to string tests -- output should be verified!
-    puts browser.image(:xpath , "//img[@name='circle']/").to_s
-  end
-  
-end
-
+# feature tests for Images
+# revision: $Revision$
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+require 'ftools'
+require 'webrick'
+require 'watir/cookiemanager'
+
+class TC_Images_XPath < Test::Unit::TestCase
+  include Watir
+  
+  def setup
+    gotoImagePage
+  end
+  
+  def gotoImagePage
+    goto_page "images1.html"
+  end
+  
+  def test_imageExists
+    assert_false( browser.image(:xpath , "//img[@name='missing_name']/").exists?  )
+    assert(       browser.image(:xpath , "//img[@name='circle']/").exists?  )
+    # assert(       browser.image(:name , /circ/ ).exists?  )
+    
+    assert_false( browser.image(:xpath , "//img[@id='missing_id']/").exists?  )
+    assert(       browser.image(:xpath , "//img[@id='square']/").exists?  )
+    # assert(       browser.image(:id , /squ/ ).exists?  )
+    
+    assert_false( browser.image(:xpath , "//img[@src='missingsrc.gif']/").exists?  )
+    
+    # BP -- This fails for me but not for Paul. It doesn't make sense to me that it should pass.  
+    # assert(       browser.image(:src , "file:///#{$myDir}/html/images/triangle.jpg").exists?  )
+    # assert(       browser.image(:src , /triangle/ ).exists?  )
+    
+    assert(       browser.image(:alt , "circle" ).exists?  )
+    # assert(       browser.image(:alt , /cir/ ).exists?  )
+    
+    assert_false(  browser.image(:alt , "triangle" ).exists?  )
+    # assert_false(  browser.image(:alt , /tri/ ).exists?  )
+  end
+  
+  def test_image_click
+    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@name='no_image_with_this']/").click }
+    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@id='no_image_with_this']/").click }
+    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@src='no_image_with_this']/").click}
+    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@alt='no_image_with_this']/").click}
+    
+    # test for bug 1882
+    browser.text_field(:name , "text1").clear
+    browser.button(:value , /Pos/ ).click
+    assert_equal('clicked' , browser.text_field(:name , "text1" ).value )
+    
+    # test for disabled button
+    # assert_false( browser.image(:name , 'disabler_test').disabled )
+    # browser.button(:name , 'disable_img').click
+    
+    # assert( browser.image(:name , 'disabler_test').disabled )
+    # browser.button(:name , 'disable_img').click
+    
+    # browser.image(:src, /button/).click
+    # assert(browser.text.include?("PASS") )
+    
+  end
+  
+  
+  
+  def test_imageHasLoaded
+    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@name='no_image_with_this']/").hasLoaded? }
+    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@id='no_image_with_this']/").hasLoaded? }
+    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@src='no_image_with_this']/").hasLoaded? }
+    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@alt='no_image_with_this']/").hasLoaded? }
+    
+    assert_false( browser.image(:xpath , "//img[@name='themissingimage']/").hasLoaded?  )
+    assert( browser.image(:xpath , "//img[@name='circle']/").hasLoaded?  )
+    
+    assert( browser.image(:xpath , "//img[@alt='circle']/").hasLoaded?  )
+    # assert( browser.image(:alt, /cir/ ).hasLoaded?  )
+  end
+  
+  def test_image_properties
+    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@name='no_image_with_this']/").hasLoaded? }
+    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@id='no_image_with_this']/").hasLoaded? }
+    assert_raises(UnknownObjectException ) { browser.image(:xpath , "//img[@src='no_image_with_this']/").hasLoaded? }
+    
+    # to string tests -- output should be verified!
+    puts browser.image(:xpath , "//img[@name='circle']/").to_s
+  end
+  
+end
+

data/unittests/links_multi_test.rb

@@ -1,49 +1,49 @@
-# feature tests for Links with multiple attributes
-# revision: $Revision: 1009 $
-
-$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
-require 'unittests/setup'
-
-class TC_Links_Multi < Test::Unit::TestCase
-  
-  def setup
-    goto_page 'links_multi.html'
-  end
-  
-  def test_existing
-    assert_match(/not.html/, browser.link(:class, 'Papa').href)
-    assert_match(/mama.html/, browser.link(:text, 'click').href)
-  end
-
-  def test_class_alias
-    assert_match(/not.html/, browser.link(:class_name, 'Papa').href)
-  end
-  
-  def test_hash_syntax
-    assert_match(/not.html/, browser.link(:class => 'Papa').href)
-    assert_match(/mama.html/, browser.link(:text => 'click').href)
-  end
-  
-  def test_class_and_text
-    assert_match(/papa.html/, browser.link(:class => 'Papa', :text => 'click').href)
-  end
-  
-  def test_class_and_index
-    assert_match(/papa.html/, browser.link(:class => 'Papa', :index => 2).href)
-  end  
-
-  def test_not_found_single
-    exception = assert_raise(UnknownObjectException) do
-      browser.link(:id, 'Missing').href
-    end
-    assert_equal('Unable to locate element, using :id, "Missing"', exception.message)
-  end
-  
-  def test_not_found_with_multi
-    exception = assert_raise(UnknownObjectException) do
-      browser.link(:class => 'Missing', :index => 2).href
-    end
-    assert_equal('Unable to locate element, using {:class=>"Missing", :index=>2}', exception.message)
-  end
-  
+# feature tests for Links with multiple attributes
+# revision: $Revision: 1009 $
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_Links_Multi < Test::Unit::TestCase
+  
+  def setup
+    goto_page 'links_multi.html'
+  end
+  
+  def test_existing
+    assert_match(/not.html/, browser.link(:class, 'Papa').href)
+    assert_match(/mama.html/, browser.link(:text, 'click').href)
+  end
+
+  def test_class_alias
+    assert_match(/not.html/, browser.link(:class_name, 'Papa').href)
+  end
+  
+  def test_hash_syntax
+    assert_match(/not.html/, browser.link(:class => 'Papa').href)
+    assert_match(/mama.html/, browser.link(:text => 'click').href)
+  end
+  
+  def test_class_and_text
+    assert_match(/papa.html/, browser.link(:class => 'Papa', :text => 'click').href)
+  end
+  
+  def test_class_and_index
+    assert_match(/papa.html/, browser.link(:class => 'Papa', :index => 2).href)
+  end  
+
+  def test_not_found_single
+    exception = assert_raise(UnknownObjectException) do
+      browser.link(:id, 'Missing').href
+    end
+    assert_equal('Unable to locate element, using :id, "Missing"', exception.message)
+  end
+  
+  def test_not_found_with_multi
+    exception = assert_raise(UnknownObjectException) do
+      browser.link(:class => 'Missing', :index => 2).href
+    end
+    assert_equal('Unable to locate element, using {:class=>"Missing", :index=>2}', exception.message)
+  end
+  
 end

data/unittests/links_test.rb

@@ -1,177 +1,175 @@
-# feature tests for Links
-# revision: $Revision: 1536 $
-
-$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
-require 'unittests/setup'
-require 'cgi'
-
-class TC_Links < Test::Unit::TestCase
-  include Watir::Exception
-  
-  def setup
-    goto_page "links1.html"
-  end
-  
-  tag_method :test_bad_attribute, :fails_on_firefox
-  def test_bad_attribute
-    assert_raises(MissingWayOfFindingObjectException) { browser.link(:bad_attribute, 199).click }  
-    begin
-      browser.link(:bad_attribute, 199).click 
-    rescue MissingWayOfFindingObjectException => e           
-      assert_equal "bad_attribute is an unknown way of finding a <A> element (199)", e.to_s
-    end
-  end
-  
-  def xtest_missing_links_dont_exist
-    assert_false(exists?{browser.link(:text, "missing")})   
-    assert_false(exists?{browser.link(:text, /miss/)})   
-  end
-  
-  def test_link_Exists
-    assert(browser.link(:text, "test1").exists?)   
-    assert(browser.link(:text, /TEST/i).exists?)   
-    assert_false(browser.link(:text, "missing").exists?)   
-    assert_false(browser.link(:text, /miss/).exists?)   
-    
-    # this assert we have to build up the path
-    #  this is what it looks like if you do a to_s on the link  file:///C:/watir_bonus/unitTests/html/links1.HTML
-    # but what we get back from $htmlRoot is a mixed case, so its almost impossible for use to test this correctly
-    # assert(browser.link(:url,'file:///C:/watir_bonus/unitTests/html/links1.HTML' ).exists?)   
-    
-    assert(browser.link(:url, /link_pass.html/).exists?)   
-    assert_false(browser.link(:url, "alsomissing.html").exists?)   
-    
-    assert(browser.link(:id, "link_id").exists?)   
-    assert_false(browser.link(:id, "alsomissing").exists?)   
-    
-    assert(browser.link(:id, /_id/).exists?)   
-    assert_false(browser.link(:id, /alsomissing/).exists?)   
-    
-    assert(browser.link(:name, "link_name").exists?)   
-    assert_false(browser.link(:name, "alsomissing").exists?)   
-    
-    assert(browser.link(:name, /_n/).exists?)   
-    assert_false(browser.link(:name, /missing/).exists?)   
-    
-    assert(browser.link(:title, /ti/).exists?)   
-    assert(browser.link(:title, "link_title").exists?)   
-    
-    assert_false(browser.link(:title, /missing/).exists?)   
-    
-    assert(browser.link(:url, /_pass/).exists?)   
-    assert_false(browser.link(:url, /dont_exist/).exists?)   
-  end
-  
-  def test_link_click
-    browser.link(:text, "test1").click
-    assert( browser.text.include?("Links2-Pass") ) 
-  end
-  def test_link2_click    
-    browser.link(:url, /link_pass.html/).click
-    assert( browser.text.include?("Links3-Pass") ) 
-  end
-  def test_link3_click        
-    browser.link(:index, 1).click
-    assert( browser.text.include?("Links2-Pass") ) 
-  end
-  def test_link4_click        
-    assert_raises(UnknownObjectException, "UnknownObjectException  was supposed to be thrown" ) {   browser.link(:index, 199).click }  
-  end
-  
-  def test_link_properties
-    assert_raises(UnknownObjectException) { browser.link(:index, 199).href }  
-    assert_raises(UnknownObjectException) { browser.link(:index, 199).value}  
-    assert_raises(UnknownObjectException) { browser.link(:index, 199).innerText }  
-    assert_raises(UnknownObjectException) { browser.link(:index, 199).name }  
-    assert_raises(UnknownObjectException) { browser.link(:index, 199).id }  
-    assert_raises(UnknownObjectException) { browser.link(:index, 199).disabled }  
-    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_equal("link_id"   , browser.link(:index, 6).id )
-    assert_equal("link_name" , browser.link(:index, 7).name )
-    
-    assert_equal("" , browser.link(:index, 7).title)
-    
-    assert_equal("link_title" , browser.link(:index, 8).title)
-  end
-  
-  def test_link_iterator
-    assert_equal(9, browser.links.length )
-    assert_equal("Link Using a name" , browser.links[7].innerText)
-    
-    index = 1
-    browser.links.each do |link|
-      assert_equal(browser.link(:index, index).href      , link.href )
-      assert_equal(browser.link(:index, index).id        , link.id )
-      assert_equal(browser.link(:index, index).name      , link.name )
-      assert_equal(browser.link(:index, index).innerText , link.innerText )
-      index+=1
-    end
-  end
-  
-  def test_div_xml_bug
-    goto_page "div_xml.html"
-    assert_nothing_raised {browser.link(:text, 'Create').exists? }   
-  end
-end
-
-class TC_Frame_Links < Test::Unit::TestCase
-  include Watir::Exception
-  
-  def setup
-    goto_page "frame_links.html"
-  end
-  
-  def test_links_in_frames
-    assert(browser.frame("linkFrame").link(:text, "test1").exists?)   
-    assert_false(browser.frame("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)
-    
-    count =0
-    browser.frame("linkFrame").links.each do |l|
-      count+=1
-    end
-    
-    assert_equal( 9 , count)
-  end    
-end
-
-require 'unittests/iostring'
-class TC_showlinks < Test::Unit::TestCase
-  tags :fails_on_firefox
-  include MockStdoutTestCase
-  
-  def test_showLinks
-    goto_page "links1.html"
-    $stdout = @mockout
-    browser.showLinks
-    expected = [/^index name +id +href + text\/src$/,
-    get_path_regex(1, "links2.html", "test1"),
-    get_path_regex(2, "link_pass.html", "test1"),
-    get_path_regex(3, "pass3.html", " / file:///#{$myDir.downcase}/html/images/button.jpg"),
-    get_path_regex(4, "textarea.html", "new window"),
-    get_path_regex(5, "textarea.html", "new window"),
-    get_path_regex(6, "links1.html", "link using an id", "link_id"),
-    get_path_regex(7, "links1.html", "link using a name", "link_name"),
-    get_path_regex(8, "links1.html", "link using a title"),
-    get_path_regex(9, "pass.html", "image and a text link / file:///#{$myDir.downcase}/html/images/triangle.jpg")]
-    items = @mockout.split(/\n/).collect {|s| CGI.unescape(s.downcase.strip)}
-    expected.each_with_index{|regex, x| assert_match(regex, items[x])}
-  end
-  
-  def get_path_regex(idx, name, inner, nameid="")
-    Regexp.new("^#{idx} +#{nameid} +file:///#{$myDir.downcase}/html/#{name} *#{inner}$")
-  end
-end
+# feature tests for Links
+# revision: $Revision$
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+require 'cgi'
+
+class TC_Links < Test::Unit::TestCase
+  include Watir::Exception
+  
+  def setup
+    goto_page "links1.html"
+  end
+  
+  tag_method :test_bad_attribute, :fails_on_firefox
+  def test_bad_attribute
+    assert_raises(MissingWayOfFindingObjectException) { browser.link(:bad_attribute, 199).click }  
+    begin
+      browser.link(:bad_attribute, 199).click 
+    rescue MissingWayOfFindingObjectException => e           
+      assert_equal "bad_attribute is an unknown way of finding a <A> element (199)", e.to_s
+    end
+  end
+  
+  def xtest_missing_links_dont_exist
+    assert_false(exists?{browser.link(:text, "missing")})   
+    assert_false(exists?{browser.link(:text, /miss/)})   
+  end
+  
+  def test_link_Exists
+    assert(browser.link(:text, "test1").exists?)   
+    assert(browser.link(:text, /TEST/i).exists?)   
+    assert_false(browser.link(:text, "missing").exists?)   
+    assert_false(browser.link(:text, /miss/).exists?)   
+    
+    # this assert we have to build up the path
+    #  this is what it looks like if you do a to_s on the link  file:///C:/watir_bonus/unitTests/html/links1.HTML
+    # but what we get back from $htmlRoot is a mixed case, so its almost impossible for use to test this correctly
+    # assert(browser.link(:url,'file:///C:/watir_bonus/unitTests/html/links1.HTML' ).exists?)   
+    
+    assert(browser.link(:url, /link_pass.html/).exists?)   
+    assert_false(browser.link(:url, "alsomissing.html").exists?)   
+    
+    assert(browser.link(:id, "link_id").exists?)   
+    assert_false(browser.link(:id, "alsomissing").exists?)   
+    
+    assert(browser.link(:id, /_id/).exists?)   
+    assert_false(browser.link(:id, /alsomissing/).exists?)   
+    
+    assert(browser.link(:name, "link_name").exists?)   
+    assert_false(browser.link(:name, "alsomissing").exists?)   
+    
+    assert(browser.link(:name, /_n/).exists?)   
+    assert_false(browser.link(:name, /missing/).exists?)   
+    
+    assert(browser.link(:title, /ti/).exists?)   
+    assert(browser.link(:title, "link_title").exists?)   
+    
+    assert_false(browser.link(:title, /missing/).exists?)   
+    
+    assert(browser.link(:url, /_pass/).exists?)   
+    assert_false(browser.link(:url, /dont_exist/).exists?)   
+  end
+  
+  def test_link_click
+    browser.link(:text, "test1").click
+    assert( browser.text.include?("Links2-Pass") ) 
+  end
+  def test_link2_click    
+    browser.link(:url, /link_pass.html/).click
+    assert( browser.text.include?("Links3-Pass") ) 
+  end
+  def test_link3_click        
+    browser.link(:index, 1).click
+    assert( browser.text.include?("Links2-Pass") ) 
+  end
+  def test_link4_click        
+    assert_raises(UnknownObjectException, "UnknownObjectException  was supposed to be thrown" ) {   browser.link(:index, 199).click }  
+  end
+  
+  def test_link_properties
+    assert_raises(UnknownObjectException) { browser.link(:index, 199).href }  
+    assert_raises(UnknownObjectException) { browser.link(:index, 199).value}  
+    assert_raises(UnknownObjectException) { browser.link(:index, 199).innerText }  
+    assert_raises(UnknownObjectException) { browser.link(:index, 199).name }  
+    assert_raises(UnknownObjectException) { browser.link(:index, 199).id }  
+    assert_raises(UnknownObjectException) { browser.link(:index, 199).disabled }  
+    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_equal("link_id"   , browser.link(:index, 6).id )
+    assert_equal("link_name" , browser.link(:index, 7).name )
+    
+    assert_equal("" , browser.link(:index, 7).title)
+    
+    assert_equal("link_title" , browser.link(:index, 8).title)
+  end
+  
+  def test_link_iterator
+    assert_equal(9, browser.links.length )
+    assert_equal("Link Using a name" , browser.links[7].innerText)
+    
+    index = 1
+    browser.links.each do |link|
+      assert_equal(browser.link(:index, index).href      , link.href )
+      assert_equal(browser.link(:index, index).id        , link.id )
+      assert_equal(browser.link(:index, index).name      , link.name )
+      assert_equal(browser.link(:index, index).innerText , link.innerText )
+      index+=1
+    end
+  end
+  
+  def test_div_xml_bug
+    goto_page "div_xml.html"
+    assert_nothing_raised {browser.link(:text, 'Create').exists? }   
+  end
+end
+
+class TC_Frame_Links < Test::Unit::TestCase
+  include Watir::Exception
+  
+  def setup
+    goto_page "frame_links.html"
+  end
+  
+  def test_links_in_frames
+    assert(browser.frame("linkFrame").link(:text, "test1").exists?)   
+    assert_false(browser.frame("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)
+    
+    count =0
+    browser.frame("linkFrame").links.each do |l|
+      count+=1
+    end
+    
+    assert_equal( 9 , count)
+  end    
+end
+
+class TC_showlinks < Test::Unit::TestCase
+  tags :fails_on_firefox
+  include CaptureIOHelper
+  
+  def test_showLinks
+    goto_page "links1.html"
+    actual = capture_stdout { browser.showLinks }
+    expected = [/^index name +id +href + text\/src$/,
+    get_path_regex(1, "links2.html", "test1"),
+    get_path_regex(2, "link_pass.html", "test1"),
+    get_path_regex(3, "pass3.html", " / file:///#{$myDir.downcase}/html/images/button.jpg"),
+    get_path_regex(4, "textarea.html", "new window"),
+    get_path_regex(5, "textarea.html", "new window"),
+    get_path_regex(6, "links1.html", "link using an id", "link_id"),
+    get_path_regex(7, "links1.html", "link using a name", "link_name"),
+    get_path_regex(8, "links1.html", "link using a title"),
+    get_path_regex(9, "pass.html", "image and a text link / file:///#{$myDir.downcase}/html/images/triangle.jpg")]
+    items = actual.split(/\n/).collect {|s| CGI.unescape(s.downcase.strip)}
+    expected.each_with_index{|regex, x| assert_match(regex, items[x])}
+  end
+  
+  def get_path_regex(idx, name, inner, nameid="")
+    Regexp.new("^#{idx} +#{nameid} +file:///#{$myDir.downcase}/html/#{name} *#{inner}$")
+  end
+end