celerity 0.0.1

data/spec/ps_spec.rb

@@ -0,0 +1,40 @@
+require File.dirname(__FILE__) + '/spec_helper.rb'
+
+describe "Ps" do
+  before :all do
+    @ie = IE.new
+    add_spec_checker(@ie)    
+  end
+
+  before :each do
+    @ie.goto(TEST_HOST + "/non_control_elements.html")
+  end
+
+  describe "#length" do
+    it "should return the number of ps" do
+      @ie.ps.length.should == 5
+    end
+  end
+  
+  describe "#[]" do
+    it "should return the p at the given index" do
+      @ie.ps[1].id.should == "lead"
+    end
+  end
+
+  describe "#each" do
+    it "should iterate through ps correctly" do
+      @ie.ps.each_with_index do |p, index|
+        p.name.should == @ie.p(:index, index+1).name
+        p.id.should == @ie.p(:index, index+1).id
+        p.value.should == @ie.p(:index, index+1).value
+      end
+    end
+  end
+  
+  after :all do
+    @ie.close
+  end
+
+end
+

data/spec/radio_spec.rb

@@ -0,0 +1,260 @@
+require File.dirname(__FILE__) + '/spec_helper.rb'
+
+describe "Radio" do
+  
+  before :all do
+    @ie = IE.new
+    add_spec_checker(@ie)    
+  end
+
+  before :each do
+    @ie.goto(TEST_HOST + "/forms_with_input_elements.html")
+  end
+
+  
+  # Exists method
+  
+  describe "#exists?" do
+    it "should return true if the radio button exists" do
+      @ie.radio(:id, "new_user_newsletter_yes").should exist
+      @ie.radio(:id, /new_user_newsletter_yes/).should exist
+      @ie.radio(:name, "new_user_newsletter").should exist
+      @ie.radio(:name, /new_user_newsletter/).should exist
+      @ie.radio(:value, "yes").should exist
+      @ie.radio(:value, /yes/).should exist
+      # we need to figure out what :text means for a radio button
+      @ie.radio(:text, "yes").should exist
+      @ie.radio(:text, /yes/).should exist
+      @ie.radio(:class, "huge").should exist
+      @ie.radio(:class, /huge/).should exist
+      @ie.radio(:index, 1).should exist
+      @ie.radio(:xpath, "input[@id='new_user_newsletter_yes']").should exist
+    end
+    
+    it "should return true if the radio button exists (search by name and value)" do
+      @ie.radio(:name, "new_user_newsletter", 'yes').should exist
+      @ie.radio(:xpath, "//input[@name='new_user_newsletter' and @value='yes']").set
+    end
+    
+    it "should return false if the radio button does not exist" do
+      @ie.radio(:id, "no_such_id").should_not exist
+      @ie.radio(:id, /no_such_id/).should_not exist
+      @ie.radio(:name, "no_such_name").should_not exist
+      @ie.radio(:name, /no_such_name/).should_not exist
+      @ie.radio(:value, "no_such_value").should_not exist
+      @ie.radio(:value, /no_such_value/).should_not exist
+      @ie.radio(:text, "no_such_text").should_not exist
+      @ie.radio(:text, /no_such_text/).should_not exist
+      @ie.radio(:class, "no_such_class").should_not exist
+      @ie.radio(:class, /no_such_class/).should_not exist
+      @ie.radio(:index, 1337).should_not exist
+      @ie.radio(:xpath, "input[@id='no_such_id']").should_not exist
+    end
+    
+    it "should return false if the radio button does not exist (search by name and value)" do
+      @ie.radio(:name, "new_user_newsletter", 'no_such_value').should_not exist
+      @ie.radio(:xpath, "//input[@name='new_user_newsletter' and @value='no_such_value']").should_not exist
+      @ie.radio(:name, "no_such_name", 'yes').should_not exist
+      @ie.radio(:xpath, "//input[@name='no_such_name' and @value='yes']").should_not exist
+    end
+    
+    it "should return true for radios with a string value" do
+      @ie.radio(:name, 'new_user_newsletter', 'yes').should exist
+      @ie.radio(:name, 'new_user_newsletter', 'no').should exist
+    end
+    
+    it "should raise ArgumentError when what argument is invalid" do
+      lambda { @ie.radio(:id, 3.14).exists? }.should raise_error(ArgumentError)
+    end
+
+    it "should raise MissingWayOfFindingObjectException when how argument is invalid" do
+      lambda { @ie.radio(:no_such_how, 'some_value').exists? }.should raise_error(MissingWayOfFindingObjectException)
+    end
+  end
+  
+  
+  # Attribute methods
+  
+  describe "#class_name" do
+    it "should return the class name if the radio exists and has an attribute" do
+      @ie.radio(:id, "new_user_newsletter_yes").class_name.should == "huge"
+    end
+    it "should return an emptry string if the radio exists and the attribute doesn't" do
+      @ie.radio(:id, "new_user_newsletter_no").class_name.should == ""
+    end
+    it "should raise UnknownObjectException if the radio doesn't exist" do
+      lambda { @ie.radio(:id, "no_such_id").class_name }.should raise_error(UnknownObjectException)
+    end
+  end
+  
+  describe "#id" do
+    it "should return the id attribute if the radio exists and has an attribute" do
+      @ie.radio(:index, 1).id.should == "new_user_newsletter_yes"
+    end
+    it "should return an emptry string if the radio exists and the attribute doesn't" do
+      @ie.radio(:index, 3).id.should == ""
+    end
+    it "should raise UnknownObjectException if the radio doesn't exist" do
+      lambda { @ie.radio(:index, 1337).id }.should raise_error(UnknownObjectException)
+    end
+  end
+
+  describe "#name" do
+    it "should return the name attribute if the radio exists" do
+      @ie.radio(:id, 'new_user_newsletter_yes').name.should == "new_user_newsletter"
+    end
+    it "should return an empty string if the radio exists and the attribute doesn't" do
+      @ie.radio(:id, 'new_user_newsletter_absolutely').name.should == ""
+    end
+    it "should raise UnknownObjectException if the radio doesn't exist" do
+      lambda { @ie.radio(:index, 1337).name }.should raise_error(UnknownObjectException)
+    end
+  end
+  
+  describe "#title" do
+    it "should return the title attribute if the radio exists" do
+      @ie.radio(:id, "new_user_newsletter_no").title.should == "Traitor!"
+    end
+    it "should return an emptry string if the radio exists and the attribute doesn't" do
+      @ie.radio(:id, "new_user_newsletter_yes").title.should == ""
+    end
+    it "should raise UnknownObjectException if the radio doesn't exist" do
+      lambda { @ie.radio(:index, 1337).title }.should raise_error(UnknownObjectException)  
+    end
+  end
+
+  describe "#type" do
+    it "should return the type attribute if the radio exists" do
+      @ie.radio(:index, 1).type.should == "radio"
+    end
+    it "should raise UnknownObjectException if the radio doesn't exist" do
+      lambda { @ie.radio(:index, 1337).type }.should raise_error(UnknownObjectException)  
+    end
+  end
+  
+  describe "#value" do
+    it "should return the value attribute if the radio exists" do
+      @ie.radio(:id, 'new_user_newsletter_yes').value.should == 'yes'
+    end
+    it "should raise UnknownObjectException if the radio doesn't exist" do
+      lambda { @ie.radio(:index, 1337).value}.should raise_error(UnknownObjectException)
+    end
+  end
+  
+  
+  # Access methods
+  
+  describe "#enabled?" do
+    it "should return true if the radio button is enabled" do
+      @ie.radio(:id, "new_user_newsletter_yes").should be_enabled
+      @ie.radio(:xpath, "//input[@id='new_user_newsletter_yes']").should be_enabled
+    end
+    it "should return false if the radio button is disabled" do
+      @ie.radio(:id, "new_user_newsletter_nah").should_not be_enabled
+      @ie.radio(:xpath,"//input[@id='new_user_newsletter_nah']").should_not be_enabled
+    end
+    it "should raise UnknownObjectException if the radio button doesn't exist" do
+      lambda { @ie.radio(:id, "no_such_id").enabled?  }.should raise_error(UnknownObjectException)  
+      lambda { @ie.radio(:xpath, "//input[@id='no_such_id']").enabled?  }.should raise_error(UnknownObjectException)
+    end
+  end
+  
+  describe "#disabled?" do
+    it "should return true if the radio is disabled" do
+      @ie.radio(:id, 'new_user_newsletter_nah').should be_disabled
+    end
+    it "should return false if the radio is enabled" do
+      @ie.radio(:id, 'new_user_newsletter_yes').should_not be_disabled
+    end
+    it "should raise UnknownObjectException if the radio doesn't exist" do
+      lambda { @ie.radio(:index, 1337).disabled? }.should raise_error(UnknownObjectException)  
+    end
+  end
+  
+  
+  # Manipulation methods
+  
+  describe "clear" do
+    it "should clear the radio button if it is set" do
+      @ie.radio(:id, "new_user_newsletter_yes").clear
+      @ie.radio(:id, "new_user_newsletter_yes").should_not be_set
+    end
+    it "should clear the radio button when found by :xpath" do
+      @ie.radio(:xpath, "//input[@id='new_user_newsletter_yes']").clear
+      @ie.radio(:xpath, "//input[@id='new_user_newsletter_yes']").should_not be_set
+    end
+    it "should raise UnknownObjectException if the radio button doesn't exist" do
+      lambda { @ie.radio(:name, "no_such_id").clear }.should raise_error(UnknownObjectException)
+      lambda { @ie.radio(:xpath, "//input[@id='no_such_id']").clear  }.should raise_error(UnknownObjectException)  
+    end
+    it "should raise ObjectDisabledException if the radio is disabled" do
+      @ie.radio(:id, "new_user_newsletter_nah").should_not be_set
+      lambda { @ie.radio(:id, "new_user_newsletter_nah").clear }.should raise_error(ObjectDisabledException)
+      lambda { @ie.radio(:xpath, "//input[@id='new_user_newsletter_nah']").clear }.should raise_error(ObjectDisabledException)
+    end
+  end
+  
+  describe "#set" do
+    it "should set the radio button" do
+      @ie.radio(:id, "new_user_newsletter_no").set
+      @ie.radio(:id, "new_user_newsletter_no").should be_set
+    end
+    it "should set the radio button when found by :xpath" do
+      @ie.radio(:xpath, "//input[@id='new_user_newsletter_no']").set
+      @ie.radio(:xpath, "//input[@id='new_user_newsletter_no']").should be_set
+    end
+
+    it "should fire the onclick event"
+
+    it "should raise UnknownObjectException if the radio button doesn't exist" do
+      lambda { @ie.radio(:name, "no_such_name").set  }.should raise_error(UnknownObjectException)
+      lambda { @ie.radio(:xpath, "//input[@name='no_such_name']").set  }.should raise_error(UnknownObjectException)
+    end
+    it "should raise ObjectDisabledException if the radio is disabled" do
+      lambda { @ie.radio(:id, "new_user_newsletter_nah").set  }.should raise_error(ObjectDisabledException)
+      lambda { @ie.radio(:xpath, "//input[@id='new_user_newsletter_nah']").set  }.should raise_error(ObjectDisabledException )
+    end
+  end
+  
+  
+  # Other
+  
+  describe '#set?' do
+    it "should return true if the radio button is set" do
+      @ie.radio(:id, "new_user_newsletter_yes").should be_set
+    end
+    it "should return false if the radio button unset" do
+      @ie.radio(:id, "new_user_newsletter_no").should_not be_set
+    end
+    it "should return the state for radios with string values" do
+      @ie.radio(:name, "new_user_newsletter", 'no').should_not be_set
+      @ie.radio(:name, "new_user_newsletter", 'no').set
+      @ie.radio(:name, "new_user_newsletter", 'no').should be_set
+      @ie.radio(:name, "new_user_newsletter", 'no').clear
+      @ie.radio(:name, "new_user_newsletter", 'no').should_not be_set
+    end
+    it "should raise UnknownObjectException if the radio button doesn't exist" do
+      lambda { @ie.radio(:id, "no_such_id").set?  }.should raise_error(UnknownObjectException)  
+      lambda { @ie.radio(:xpath, "//input[@id='no_such_id']").set?  }.should raise_error(UnknownObjectException)
+    end    
+  end
+  
+  describe "#get_state" do
+    it "should return true if the radio is set" do
+      @ie.radio(:id, "new_user_newsletter_yes").get_state.should be_true
+    end
+    it "should return false if the radio is unset" do
+      @ie.radio(:id, "new_user_newsletter_no").get_state.should be_false
+    end
+    it "should raise UnknownObjectException if the radio doesn't exist" do
+      lambda {   @ie.radio(:name, "no_such_name").get_state  }.should raise_error(UnknownObjectException)
+      lambda {   @ie.radio(:xpath, "//input[@name='no_such_name']").get_state  }.should raise_error(UnknownObjectException)
+    end
+  end
+
+  after :all do
+    @ie.close
+  end
+
+end
+

data/spec/radios_spec.rb

@@ -0,0 +1,43 @@
+require File.dirname(__FILE__) + '/spec_helper.rb'
+
+describe "Radios" do
+  
+  before :all do
+    @ie = IE.new
+    add_spec_checker(@ie)    
+  end
+
+  before :each do
+    @ie.goto(TEST_HOST + "/forms_with_input_elements.html")
+  end
+  
+  describe "#length" do
+    it "should return the number of radios" do
+      @ie.radios.length.should == 5
+    end
+  end
+  
+  describe "#[]" do
+    it "should return the radio button at the given index" do
+      @ie.radios[1].id.should == "new_user_newsletter_yes"
+    end
+  end
+  
+  describe "#each" do
+    it "should iterate through radio buttons correctly" do
+      index = 1
+      @ie.radios.each do |r|
+        r.name.should == @ie.radio(:index, index).name
+        r.id.should ==  @ie.radio(:index, index).id
+        r.value.should == @ie.radio(:index, index).value
+        index += 1
+      end
+      @ie.radios.length.should == index - 1
+    end
+  end
+
+  after :all do
+    @ie.close
+  end
+  
+end

data/spec/select_list_spec.rb

@@ -0,0 +1,286 @@
+require File.dirname(__FILE__) + '/spec_helper.rb'
+
+describe "SelectList" do
+  before :all do
+    @ie = Celerity::IE.new
+    add_spec_checker(@ie)    
+  end
+
+  before :each do
+    @ie.goto(TEST_HOST + "/forms_with_input_elements.html")
+  end
+  
+  
+  # Exists method
+
+  describe "#exists?" do
+    it "should return true if the select list exists" do
+      @ie.select_list(:id, 'new_user_country').should exist
+      @ie.select_list(:id, /new_user_country/).should exist
+      @ie.select_list(:name, 'new_user_country').should exist
+      @ie.select_list(:name, /new_user_country/).should exist
+      
+      # check behaviour in Watir
+      # @ie.select_list(:value, 'Norway').should exist
+      # @ie.select_list(:value, /Norway/).should exist
+
+      # not sure what :text is for input elements
+      # @ie.select_list(:text, 'Norway').should exist
+      # @ie.select_list(:text, /Norway/).should exist
+      @ie.select_list(:class, 'country').should exist
+      @ie.select_list(:class, /country/).should exist
+      @ie.select_list(:index, 1).should exist
+      @ie.select_list(:xpath, "//select[@id='new_user_country']").should exist
+    end
+    it "should return false if the select list doesn't exist" do
+      @ie.select_list(:id, 'no_such_id').should_not exist
+      @ie.select_list(:id, /no_such_id/).should_not exist
+      @ie.select_list(:name, 'no_such_name').should_not exist
+      @ie.select_list(:name, /no_such_name/).should_not exist
+      @ie.select_list(:value, 'no_such_value').should_not exist
+      @ie.select_list(:value, /no_such_value/).should_not exist
+      @ie.select_list(:text, 'no_such_text').should_not exist
+      @ie.select_list(:text, /no_such_text/).should_not exist
+      @ie.select_list(:class, 'no_such_class').should_not exist
+      @ie.select_list(:class, /no_such_class/).should_not exist
+      @ie.select_list(:index, 1337).should_not exist
+      @ie.select_list(:xpath, "//select[@id='no_such_id']").should_not exist
+    end
+    
+    it "should raise ArgumentError when what argument is invalid" do
+      lambda { @ie.select_list(:id, 3.14).exists? }.should raise_error(ArgumentError)
+    end
+    
+    it "should raise MissingWayOfFindingObjectException when how argument is invalid" do
+      lambda { @ie.select_list(:no_such_how, 'some_value').exists? }.should raise_error(MissingWayOfFindingObjectException)
+    end
+  end
+  
+  
+  # Attribute methods
+  
+  describe "#class_name" do
+    it "should return the class name of the select list" do
+      @ie.select_list(:name, 'new_user_country').class_name.should == 'country'
+    end
+    it "should raise UnknownObjectException if the select list doesn't exist" do
+      lambda { @ie.select_list(:name, 'no_such_name').class_name }.should raise_error(UnknownObjectException)
+    end
+  end
+  
+  describe "#id" do
+    it "should return the id of the element" do
+      @ie.select_list(:index, 1).id.should == "new_user_country"
+    end
+    it "should raise UnknownObjectException if the select list doesn't exist" do
+      lambda { @ie.select_list(:index, 1337).id }.should raise_error(UnknownObjectException)
+    end
+  end
+  
+  describe "#name" do
+    it "should return the name of the element" do
+      @ie.select_list(:index, 1).name.should == "new_user_country"
+    end
+    it "should raise UnknownObjectException if the select list doesn't exist" do
+      lambda { @ie.select_list(:index, 1337).name }.should raise_error(UnknownObjectException)
+    end
+  end
+  
+  it "should should raise UnknownObjectException when the select list does not exist" do
+    lambda { @ie.select_list(:index, 1337).disabled? }.should raise_error(UnknownObjectException)
+  end
+  
+  describe "#type" do
+    it "should return the type of the element" do
+      @ie.select_list(:index, 1).type.should == "select-one"
+      @ie.select_list(:index, 2).type.should == "select-multiple"
+    end
+    it "should raise UnknownObjectException if the select list doesn't exist" do
+      lambda { @ie.select_list(:index, 1337).type }.should raise_error(UnknownObjectException)
+    end
+  end
+
+  describe "#value" do      
+    it "should return the value of the selected option" do
+      @ie.select_list(:index, 1).value.should == "Norway"
+      @ie.select_list(:index, 1).select(/Sweden/)
+      @ie.select_list(:index, 1).value.should == "Sweden"
+    end
+    it "should raise UnknownObjectException if the select list doesn't exist" do
+      lambda { @ie.select_list(:index, 1337).value  }.should raise_error(UnknownObjectException)
+    end
+  end
+
+  
+  # Access methods
+  
+  describe "#enabled?" do
+    it "should return true if the select list is enabled" do
+      @ie.select_list(:name, 'new_user_country').should be_enabled
+    end
+    it "should return false if the select list is disabled" do
+      @ie.select_list(:name, 'new_user_role').should_not be_enabled
+    end
+    it "should raise UnknownObjectException if the select_list doesn't exist" do
+      lambda { @ie.select_list(:name, 'no_such_name').enabled? }.should raise_error(UnknownObjectException)
+    end
+  end
+  
+  describe "#disabled?" do
+    it "should return true if the select list is disabled" do
+      @ie.select_list(:index, 3).should be_disabled
+    end
+    it "should return false if the select list is enabled" do
+      @ie.select_list(:index, 1).should_not be_disabled
+    end
+  end
+  
+  
+  # Other
+  
+  describe "#option" do
+    it "should return an instance of Option" do
+      @ie.select_list(:name, "new_user_country").option(:text, "Denmark").should be_instance_of(Celerity::Option)
+    end     
+    
+    # do we need a seperate spec for this object?
+    it "should should be able to select the chosen option" do
+      @ie.select_list(:name , "new_user_country").clear_selection
+      @ie.select_list(:name , "new_user_country").option(:text, "Denmark").select
+      @ie.select_list(:name, "new_user_country").get_selected_items.should == ["Denmark"]
+    end
+    
+    it "should select the option when found by text" do
+      @ie.select_list(:name, 'new_user_country').option(:text, 'Sweden').select
+      @ie.select_list(:name, 'new_user_country').option(:text, 'Sweden').should be_selected
+    end
+    
+    it "should raise UnknownObjectException if the option does not exist" do
+      lambda { @ie.select_list(:name, "new_user_country").option(:text, "no_such_text").select }.should raise_error(UnknownObjectException)  
+      lambda { @ie.select_list(:name, "new_user_country").option(:text, /missing/).select }.should raise_error(UnknownObjectException)  
+    end
+
+    it "should raise MissingWayOfFindingObjectException when given a bad 'how'" do
+      lambda { @ie.select_list(:name, "new_user_country").option(:missing, "Denmark").select }.should raise_error(MissingWayOfFindingObjectException)
+    end
+    
+    it "should be able to get attributes" do
+      @ie.select_list(:name, "new_user_country").option(:text , 'Sweden').class_name.should == "scandinavia"
+      lambda { @ie.select_list(:name, "new_user_country").option(:text, "no_such_text").class_name }.should raise_error(UnknownObjectException)
+    end
+  end
+    
+  describe "#get_all_contents" do
+    it "should should raise UnknownObjectException if the select list doesn't exist" do
+      lambda { @ie.select_list(:name, 'no_such_name').get_all_contents }.should raise_error(UnknownObjectException)
+    end
+    it "should return all the options as an Array" do
+      @ie.select_list(:name, "new_user_country").get_all_contents.should == ["Denmark" ,"Norway" , "Sweden" , "United Kingdom", "USA"]
+    end
+  end
+  
+  describe "#get_selected_items" do
+    it "should should raise UnknownObjectException if the select list doesn't exist" do
+      lambda { @ie.select_list(:name, 'no_such_name').get_selected_items }.should raise_error(UnknownObjectException)
+    end
+    
+    it "should get the currently selected item(s)" do
+      @ie.select_list(:name, "new_user_country").get_selected_items.should == ["Norway"]
+      @ie.select_list(:name, "new_user_languages").get_selected_items.should == ["English", "Norwegian"]
+    end
+  end
+  
+  describe "#clear_selection" do
+    it "should clear the selection when possible" do
+      @ie.select_list(:name, "new_user_languages").clear_selection
+      @ie.select_list(:name, "new_user_languages").get_selected_items.should be_empty
+    end
+    it "should not clear selections when not possible" do
+      @ie.select_list(:name , "new_user_country").clear_selection
+      @ie.select_list(:name, "new_user_country").get_selected_items.should == ["Norway"]
+    end
+    it "should should raise UnknownObjectException if the select list doesn't exist" do
+      lambda { @ie.select_list(:name, 'no_such_name').clear_selection }.should raise_error(UnknownObjectException)
+    end
+  end
+  
+  describe "#includes?" do
+    it "should return true if the given option exists" do
+      @ie.select_list(:name, 'new_user_country').includes?('Denmark').should be_true
+    end
+    it "should return false if the given option doesn't exist" do
+      @ie.select_list(:name, 'new_user_country').includes?('Ireland').should be_false
+    end
+  end
+  
+  describe "#selected?" do
+    it "should return true if the given option is selected" do
+      @ie.select_list(:name, 'new_user_country').select('Denmark')
+      @ie.select_list(:name, 'new_user_country').selected?('Denmark').should be_true
+    end
+    it "should return false if the given option is not selected" do
+      @ie.select_list(:name, 'new_user_country').selected?('Sweden').should be_false
+    end
+    it "should raise UnknonwObjectException if the option doesn't exist" do
+      lambda { @ie.select_list(:name, 'new_user_country').selected?('missing_option') }.should raise_error(UnknownObjectException)
+    end
+  end
+  
+  describe "#select" do
+    it "should select the given item when given a String" do
+      @ie.select_list(:name, "new_user_country").select("Denmark")
+      @ie.select_list(:name, "new_user_country").get_selected_items.should == ["Denmark"]
+    end
+    it "should select the given item when given a Regexp" do
+      @ie.select_list(:name, "new_user_country").select(/Denmark/)
+      @ie.select_list(:name, "new_user_country").get_selected_items.should == ["Denmark"]
+    end
+    it "should select the given item when given an Xpath" do
+      @ie.select_list(:xpath, "//select[@name='new_user_country']").select("Denmark")
+      @ie.select_list(:xpath, "//select[@name='new_user_country']").get_selected_items.should == ["Denmark"]
+    end
+    it "should be able to select multiple items using :name and a String" do
+      @ie.select_list(:name, "new_user_languages").clear_selection
+      @ie.select_list(:name, "new_user_languages").select("Danish")
+      @ie.select_list(:name, "new_user_languages").select("Swedish")
+      @ie.select_list(:name, "new_user_languages").get_selected_items.should == ["Danish", "Swedish"] 
+    end
+    it "should be able to select multiple items using :name and a Regexp" do
+      @ie.select_list(:name, "new_user_languages").clear_selection
+      @ie.select_list(:name, "new_user_languages").select(/ish/)
+      @ie.select_list(:name, "new_user_languages").get_selected_items.should == ["Danish", "English", "Swedish"]
+    end
+    it "should be able to select multiple items using :xpath" do
+      @ie.select_list(:xpath, "//select[@name='new_user_languages']").clear_selection
+      @ie.select_list(:xpath, "//select[@name='new_user_languages']").select( /ish/ )
+      @ie.select_list(:xpath, "//select[@name='new_user_languages']").get_selected_items.should == ["Danish", "English", "Swedish"]
+    end
+    
+    it "should fire onchange event when selecting an item"
+
+    it "should not fire onchange event when selecting an already selected item"
+
+    it "should raise NoValueFoundException if the option doesn't exist" do
+      lambda { @ie.select_list(:name, "new_user_country").select("missing_option") }.should raise_error(NoValueFoundException)
+      lambda { @ie.select_list(:name, "new_user_country").select(/missing_option/) }.should raise_error(NoValueFoundException)
+    end
+  end
+  
+  describe "#select_value" do
+    it "should select the given item" do
+      @ie.select_list(:name, "new_user_languages").clear_selection
+      @ie.select_list(:name, "new_user_languages").select("Swedish")
+      @ie.select_list(:name, "new_user_languages").get_selected_items.should == ["Swedish"]
+    end
+    it "should raise NoValueFoundException if the option doesn't exist" do
+      lambda { @ie.select_list(:name, "new_user_languages").select_value("no_such_option") }.should raise_error(NoValueFoundException)
+      lambda { @ie.select_list(:name, "new_user_languages").select_value(/no_such_option/) }.should raise_error(NoValueFoundException)
+    end
+  end
+
+  after :all do
+    @ie.close
+  end
+
+end
+