fix bug

Author: stemangiola

R/methods.R

@@ -3727,8 +3727,8 @@ setGeneric("test_gene_overrepresentation", function(.data,
 		stop("tidybulk says: the .entrez parameter appears to no be set")
 
 	# Check column type
-	if (.data %>% rowData() %>% as_tibble(rownames = f_(.data)$name) %>% mutate(my_do_test = !!.do_test) %>% pull(my_do_test) |> is("logical") %>% not())
-	  stop("tidybulk says: .do_test column must be logical (i.e., TRUE or FALSE)")
+	if (.data %>% mutate(my_do_test = !!.do_test) %>% pull(my_do_test)  |> is("logical") |> not() )
+		stop("tidybulk says: .do_test column must be logical (i.e., TRUE or FALSE)")
 
 	# Check packages msigdbr
 	# Check if package is installed, otherwise install