Bugfix: q -> Q

2020-09-25 21:51:04 +10:00 · 2020-09-25 21:51:04 +10:00 · 169ca58b92
commit 169ca58b92
parent 091880d205
1 changed files with 1 additions and 1 deletions
--- a/scripts/BLAST.R
+++ b/scripts/BLAST.R
@ -82,7 +82,7 @@ BLAST <- function(Q,
                              "?",
                              "CMD=Put",
                              "&PROGRAM=", "blastp",
-                              "&QUERY=", URLencode(q),
+                              "&QUERY=", URLencode(Q),
                              "&DATABASE=", db,
                              "&MATRIX=", "BLOSUM62",
                              "&EXPECT=", as.character(E),