R/zzz.R

.onLoad <- function(libname, pkgname) {
    javaVersion <- system2('java', '-version', stderr=TRUE, stdout=TRUE)
    if(length(javaVersion) == 0) {
        warning('Java was not found on your system. Java is required for MS-GF+ to work.')
    } else {
        if(as.numeric(sub('.*\"\\d\\.(\\d).*', '\\1', javaVersion[1])) < 7) {
            warning('Java need to be at least version 1.7 for MS-GF+ to work. Please upgrade.')
        }
    }
}
thomasp85/MSGFplus-release documentation built on May 31, 2019, 11:09 a.m.