karchnu
/
mechanize.cr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

add select box test

master
Kanezoh 2021-07-01 20:05:15 +09:00
parent a6111294ad
commit 0ee236b9b4
3 changed files with 52 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

45
spec/form/select_list_spec.cr Normal file
View File

@ -0,0 +1,45 @@
require "../spec_helper"
WebMock.stub(:get, "example.com/form/select_list").to_return(body:
<<-BODY
<html>
<head>
<title>page_title</title>
</head>
<body>
<form action="post_path" method="post" name="sample_form">
<select name="pets" id="pet-select" multiple>
<option value="dog">Dog</option>
<option value="cat">Cat</option>
<option value="hamster">Hamster</option>
</select>
</form>
</body>
</html>
BODY
)
describe "Form Fields Multiple Select List" do
agent = Mechanize.new
page = agent.get("http://example.com/form/select_list")
form = page.forms[0]
it "returns selectboxes size" do
form.selectboxes.size.should eq 1
end
selectbox = form.selectboxes[0]
it "returns selectbox options size" do
selectbox.options.size.should eq 3
end
it "returns selected values" do
selectbox.values.empty?.should eq true
selectbox.select_all
selectbox.values.size.should eq 3
selectbox.values.should eq ["dog", "cat", "hamster"]
selectbox.select_none
selectbox.values.empty?.should eq true
end
end

12
src/mechanize/form/multi_select_list.cr
View File

@ -19,17 +19,17 @@ class MechanizeCr::FormContent::MultiSelectList
end
def select_none
@value = Array(String).new
options.each &.unclick
@values = Array(String).new
options.each &.unselect
end
def select_all
@value = Array(String).new
options.each &.click
@values = Array(String).new
options.each &.select
end
def selected_options
options.find_all(&:selected?)
options.select &.selected?
end
def values=(raw_values)
@ -45,7 +45,7 @@ class MechanizeCr::FormContent::MultiSelectList
end
def values
@values + selected_options.map(&:value)
@values + selected_options.map &.value
end
#def inspect # :nodoc:

2
src/mechanize/form/option.cr
View File

@ -34,7 +34,7 @@ class MechanizeCr::FormContent::Option
end
private def unselect_peers
return unless SelectList === @select_list
return if MultiSelectList === @select_list
@select_list.select_none
end