Skip to content

Commit

Permalink
removing packagestartup version check
Browse files Browse the repository at this point in the history
  • Loading branch information
explodecomputer committed Apr 4, 2024
1 parent 89973f9 commit 52e03a7
Show file tree
Hide file tree
Showing 3 changed files with 3 additions and 18 deletions.
1 change: 1 addition & 0 deletions .Rbuildignore
Original file line number Diff line number Diff line change
Expand Up @@ -9,3 +9,4 @@
^cran-comments\.md$
^CRAN-SUBMISSION$
^codecov\.yml$
^ieugwasr_oauth$
3 changes: 2 additions & 1 deletion NEWS.md
Original file line number Diff line number Diff line change
@@ -1,6 +1,7 @@
# ieugwasr 0.2.3
* Fixing issue with anonymous functions and backwards compatibility

* Bug in tophits when result is empty
* Removing version check at startup

# ieugwasr 0.2.2
* Reinstating https://api.opengwas.org/api/ as the API server address
Expand Down
17 changes: 0 additions & 17 deletions R/zzz.R
Original file line number Diff line number Diff line change
Expand Up @@ -31,23 +31,6 @@

.onAttach <- function(libname, pkgname) {

a <- suppressWarnings(try(readLines("https://raw.githubusercontent.com/MRCIEU/ieugwasr/master/DESCRIPTION"), silent=TRUE))

if(!inherits(a, 'try-error'))
{
latest <- gsub("Version: ", "", a[grep("Version", a)])
current = utils::packageDescription('ieugwasr')

test <- utils::compareVersion(latest, current$Version)
if(test == 1)
{
packageStartupMessage("\nWarning:\nYou are running an old version of the ieugwasr package.\n",
"This version: ", current$Version, "\n",
"Latest version: ", latest, "\n",
"Please consider updating using remotes::install_github('MRCIEU/ieugwasr')")
}
}

b <- suppressWarnings(try(jsonlite::read_json("https://raw.githubusercontent.com/MRCIEU/opengwas/main/messages.json"), silent=TRUE))
if(!inherits(b, 'try-error'))
{
Expand Down

0 comments on commit 52e03a7

Please sign in to comment.