Description: Remove test requiring network connection
Author: Andreas Tille <tille@debian.org>
Last-Update: Sun, 15 Jan 2017 17:23:15 +0100

--- a/inst/unitTests/test_utilities.R
+++ b/inst/unitTests/test_utilities.R
@@ -15,33 +15,6 @@
     checkTrue(is.null(.io_check_exists(fls[3:6])))
 }
 
-test_catch_samtools <- function()
-{
-    fl <- system.file("unitTests", "cases", "ex1_unsort.bam",
-                      package="Rsamtools")
-    err <- warn <- FALSE
-    tryCatch(suppressWarnings(withCallingHandlers({
-        indexBam(fl)
-    }, warning=function(msg) {
-        warn <<- TRUE
-    })), error=function(msg) {
-        err <<- TRUE
-    })
-    checkTrue(isFALSE(warn))
-    checkTrue(err)
-}
-
-test_catch_samtools_504 <- function()
-{
-    err <- FALSE
-    tryCatch({
-        scanBam("http://httpbin.org/status/504")
-    }, error=function(err) {
-        txt <- "failed to open BamFile:"
-        err <<- startsWith(conditionMessage(err), txt)
-    })
-    checkTrue(err)
-}
 
 test_normalizePath <- function()
 {