Test: added pylmm test

2 files changed, 16 insertions, 1 deletions

diff --git a/test/data/input/mapping/1435395_s_at_HC_M2_0606_P.json b/test/data/input/mapping/1435395_s_at_HC_M2_0606_P.json
index 9744e7b2..15428553 100644
--- a/test/data/input/mapping/1435395_s_at_HC_M2_0606_P.json
+++ b/test/data/input/mapping/1435395_s_at_HC_M2_0606_P.json
@@ -12,7 +12,7 @@
  "num_bootstrap" : "2000",
  "num_perm" : "",
  "pair_scan" : "false",
- "suggestive" : "[object Object]",
+ "suggestive" : "0",
  "trait_id" : "1433387_at",
  "value:129S1/SvImJ" : "6.920",
  "value:A/J" : "7.437",
diff --git a/test/lib/mapping.rb b/test/lib/mapping.rb
index 47c4875b..1b52d797 100644
--- a/test/lib/mapping.rb
+++ b/test/lib/mapping.rb
@@ -12,6 +12,21 @@ describe MappingTest do
   end
 
   describe MappingTest do
+    it "pylmm mapping tool selection" do
+      url = $host+'/marker_regression'
+
+      json = JSON::load(File.read('test/data/input/mapping/1435395_s_at_HC_M2_0606_P.json'))
+      json["method"] = "pylmm"
+      # p json
+      page = @agent.post(URI.encode(url), json)
+      # Unpacking the page is slow - but the run is enough as a test
+      # form = page.forms[1]
+      # form = page.forms_with("marker_regression")[0]
+      # form.fields.select { |fld| fld.name == 'corr_dataset' }.first.value.must_equal 'HC_M2_0606_P'
+    end
+  end
+
+  describe MappingTest do
     it "R/qtl mapping tool selection" do
       url = $host+'/marker_regression' # ?trait_id=1435395_s_at&dataset=HC_M2_0606_P'