fix dictPath

Author: opitzl

R/app-countSpacer.R

@@ -12,7 +12,7 @@ ezMethodCountSpacer = function(input=NA, output=NA, param=NA){
 
   sampleName = input$getNames()
   setwdNew(sampleName)
-  param[['dictPath']] = list.files(file.path('/srv/GT/databases/GEML/sgRNA_Libs/',param[['dictPath']]), pattern = 'csv', full.names = TRUE)
+  param[['dictPath']] = list.files(file.path('/srv/GT/databases/GEML/sgRNA_Libs/',param[['dictPath']]), pattern = 'final.csv', full.names = TRUE)
   dict = ezRead.table(param[['dictPath']], header = FALSE, sep = ',', row.names = NULL)
   colnames(dict) = c('TargetID', 'Sequence', 'GeneSymbol', 'isControl')
   dict[['ID']] = paste(dict$TargetID, dict$Sequence, sep = '-')