diff --git a/R/qSVA.R b/R/qSVA.R
index cad9c20..ad12fe1 100644
--- a/R/qSVA.R
+++ b/R/qSVA.R
@@ -36,13 +36,15 @@
 #'
 qSVA <-
     function(rse_tx,
-    type = "cell_component",
+    type = c("cell_component", "standard", "top1500"),
     sig_transcripts = select_transcripts(type),
     mod,
     assayname) {
         ## We don't need to pass type to getDegTx() since it's not used internally
         ## once the sig_transcripts have been defined.
       
+      type = arg_match(type)
+      
       # Validate rse_tx is a RangedSummarizedExperiment object
       if (!is(rse_tx, "RangedSummarizedExperiment")) {
         stop("'rse_tx' must be a RangedSummarizedExperiment object.", call. = FALSE)