diff options
Diffstat (limited to 'test/lib')
-rw-r--r-- | test/lib/mapping.rb | 51 | ||||
-rw-r--r-- | test/lib/navigation.rb | 12 |
2 files changed, 56 insertions, 7 deletions
diff --git a/test/lib/mapping.rb b/test/lib/mapping.rb new file mode 100644 index 00000000..08b6b5da --- /dev/null +++ b/test/lib/mapping.rb @@ -0,0 +1,51 @@ +# In these tests we navigate from the main page to a specific trait then hit the different mapping tool buttons (In this case pylMM and r/qtl) followed by computing the results (marker regressions). + + +class MappingTest +end + +describe MappingTest do + before do + @agent = Mechanize.new + @agent.agent.http.ca_file = '/etc/ssl/certs/ca-certificates.crt' + end + + describe MappingTest do + it "pyLMM mapping tool selection" do + url = $host+'/show_trait?trait_id=1435395_s_at&dataset=HC_M2_0606_P' + page = @agent.get(url) + # get the form + # form = @agent.page.form_with(:name => "my-form") + # get the button you want from the form + # page.forms.each do |form| + # p form + # end + # button = page.button_with(:value => "pylmm_compute") + # submit the form using that button + # agent.submit(form, button) + # link = page.link_with(text: 'pyLMM') + # page = link.click + # puts page.uri + # link = page.link_with(text: 'Compute') + # page = link.click + # puts page.uri + # probe_link.uri.to_s.must_equal "/marker_regression" + end + end + +end + +describe MappingTest do + it "R/qtl mapping tool selection" do + break if $options[:skip_broken] + page = @agent.get($host+'/show_trait?trait_id=1435395_s_at&dataset=HC_M2_0606_P') + link = page.link_with(text: 'R/qtl') + page = link.click + puts page.uri + form.field_with(:name => 'Methods').options[2].select + link = page.link_with(text: 'Compute') + page = link.click + puts page.uri + probe_link.uri.to_s.must_equal "/marker_regression" + end +end diff --git a/test/lib/navigation.rb b/test/lib/navigation.rb index 676ee90c..ee9f41d2 100644 --- a/test/lib/navigation.rb +++ b/test/lib/navigation.rb @@ -1,16 +1,16 @@ # In these tests we navigate from the main page to a specific trait then hit the different mapping tool buttons (In this case pylMM and r/qtl) followed by computing the results (marker regressions). -class NavigationTest +class MappingTest end -describe NavigationTest do +describe MappingTest do before do @agent = Mechanize.new @agent.agent.http.ca_file = '/etc/ssl/certs/ca-certificates.crt' end - describe NavigationTest do + describe MappingTest do it "pyLMM mapping tool selection" do break if $options[:skip_broken] page = @agent.get($host+'/show_trait?trait_id=1435395_s_at&dataset=HC_M2_0606_P') @@ -27,7 +27,7 @@ describe NavigationTest do end -describe NavigationTest do +describe MappingTest do it "R/qtl mapping tool selection" do break if $options[:skip_broken] page = @agent.get($host+'/show_trait?trait_id=1435395_s_at&dataset=HC_M2_0606_P') @@ -38,8 +38,6 @@ describe NavigationTest do link = page.link_with(text: 'Compute') page = link.click puts page.uri - probe_link.uri.to_s.must_equal "/marker_regression" + probe_link.uri.to_s.must_equal "/marker_regression" end end - - |