X-Git-Url: https://git.donarmstrong.com/?p=rsem.git;a=blobdiff_plain;f=EBSeq%2Finstall;h=d5e96b4788672532a0bef3f99c8cf53397495c79;hp=2438adb789394bb32af4fb6382353aef134dbfa1;hb=c5336a8a17203ed9036a9ebbeaadb323456d3d4e;hpb=342f158f16ee44a79cf60c2b58c4da231d9b7c3c

diff --git a/EBSeq/install b/EBSeq/install
index 2438adb..d5e96b4 100755
--- a/EBSeq/install
+++ b/EBSeq/install
@@ -1,19 +1,22 @@
 #!/usr/bin/env Rscript
 
+.libPaths(c(".", .libPaths()))
 result <- suppressWarnings(tryCatch({
-       	  library("EBSeq", lib.loc = ".")
+       	  library("EBSeq")
+	  cat("EBSeq already exists.\n")
        }, error = function(err) {
             tryCatch({
 		source("http://www.bioconductor.org/biocLite.R") 
     		biocLite("EBSeq", lib = ".")
-    		library("EBSeq", lib.loc = ".")
+    		library("EBSeq")
+		cat("The latest version of EBSeq is successfully installed from Bioconductor.\n")
 		}, error = function(err) {
 		     tryCatch({
 		         cat("Failed to install the latest version of EBSeq from Bioconductor! Try to install EBSeq v1.1.5 locally instead.\n")
       			 install.packages(c("blockmodeling_0.1.8.tar.gz", "EBSeq_1.1.5.tar.gz"), lib = ".", repos = NULL)
-      			 library("EBSeq", lib.loc = ".") 
+      			 library("EBSeq") 
+			 cat("EBSeq v1.1.5 is successfully installed locally.\n")
 			 }, error = function(err) { cat("Failed to install EBSeq v1.1.5 locally!\n") })
 		    })
 	}))
 
-