Browse code

fix gsnap() to take return value from asBam

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

Michael Lawrence authored on 09/11/2012 12:55:36
Showing 1 changed files

... ...
@@ -41,7 +41,7 @@ setMethod("gsnap", c("character", "characterORNULL", "GsnapParam"),
41 41
             gsnap_output <- GsnapOutput(path = output_path,
42 42
                                         version = gsnapVersion(),
43 43
                                         param = params)
44
-            asBam(gsnap_output)
44
+            gsnap_output <- asBam(gsnap_output)
45 45
             if (consolidate)
46 46
               consolidate(gsnap_output)
47 47
             return(gsnap_output)