Browse code

Avoiding triggering parallel calculations unless parallel.sz > 1.

git-svn-id: file:///home/git/hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/GSVA@125927 bc3139a8-67e5-0310-9ffc-ced21a209358

Robert Castelo authored on 13/01/2017 08:09:13
Showing 2 changed files

... ...
@@ -1,5 +1,5 @@
1 1
 Package: GSVA
2
-Version: 1.23.1
2
+Version: 1.23.2
3 3
 Title: Gene Set Variation Analysis for microarray and RNA-seq data
4 4
 Author: Justin Guinney with contributions from Robert Castelo
5 5
 Maintainer: Justin Guinney <justin.guinney@sagebase.org>
... ...
@@ -330,7 +330,7 @@ setMethod("gsva", signature(expr="matrix", gset.idx.list="list"),
330 330
                           dimnames=list(names(gset.idx.list), colnames(expr)))
331 331
 		
332 332
 		es.bootstraps <- array(NaN, c(n.gset, n.samples, no.bootstraps))
333
-		if(parallel.sz > 0){
333
+		if(parallel.sz > 1){
334 334
 			
335 335
 		  if(!.isPackageLoaded("snow")) {
336 336
 			  stop("Please load the 'snow' library")