Use PATH env to instead the variable

[rsem.git] / EBSeq / BiocInstaller / unitTests / test_BiocUpgrade.R

diff --git a/EBSeq/BiocInstaller/unitTests/test_BiocUpgrade.R b/EBSeq/BiocInstaller/unitTests/test_BiocUpgrade.R
deleted file mode 100644 (file)
index d4cb4e7..0000000
--- a/EBSeq/BiocInstaller/unitTests/test_BiocUpgrade.R
+++ /dev/null
@@ -1,29 +0,0 @@
-test_useDevel <- function()
-{
-    if (!BiocInstaller:::IS_END_OF_LIFE) {
-        checkException(useDevel(), silent=TRUE)
-    } else if (!BiocInstaller:::IS_DOWNGRADEABLE) {
-        checkException(useDevel(FALSE), silent=TRUE)
-    }
-    if (!BiocInstaller:::IS_UPGRADEABLE) {
-        checkException(useDevel(), silent=TRUE)
-        opts <- options(warn=2); on.exit(options(opts))
-        checkException(biocLite("BiocUpgrade"))
-    }
-}
-
-test_getContribUrl_exist <- function()
-{
-    fun <- BiocInstaller:::.getContribUrl
-    
-    vers <- BiocInstaller:::BIOC_VERSION
-    checkTrue(grepl(vers, fun(vers)))
-    if (BiocInstaller:::IS_UPGRADEABLE) {
-        vers <- BiocInstaller:::UPGRADE_VERSION
-        checkTrue(grepl(vers, fun(vers)))
-    }
-    if (BiocInstaller:::IS_DOWNGRADEABLE) {
-        vers <- BiocInstaller:::DOWNGRADE_VERSION
-        checkTrue(grepl(vers, fun(vers)))
-    }
-}