@@ -32,7 +32,7 @@ test_that("has useful print method", {
3232
3333
3434test_that(" select options are named character vector" , {
35- select <- minimal_html(" select parsing " , '
35+ select <- minimal_html('
3636 <form>
3737 <select name="x">
3838 <option value="1">a</option>
@@ -46,7 +46,7 @@ test_that("select options are named character vector", {
4646})
4747
4848test_that(" select values are inherited from names" , {
49- page <- minimal_html(" optional values " , '
49+ page <- minimal_html('
5050 <select name="b" id="a">
5151 <option value="1">x</option>
5252 <option>y</option>
@@ -58,7 +58,7 @@ test_that("select values are inherited from names", {
5858})
5959
6060test_that(" parse_fields gets the button" , {
61- select <- minimal_html(" button test " , '
61+ select <- minimal_html('
6262 <form>
6363 <button type="submit">Click me</button>
6464 </form>
@@ -77,7 +77,7 @@ test_that("handles different encoding types", {
7777})
7878
7979test_that(" validates its inputs" , {
80- select <- minimal_html(" button test " , '
80+ select <- minimal_html('
8181 <form>
8282 <button type="submit">Click me</button>
8383 </form>
0 commit comments