Rev 51899 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed
# keep in step with tools/GETDISTNAMEstatus <- switch(R.version$status,"Under development (unstable)" = "dev",tolower(R.version$status))res <- paste("R-", R.version$major, ".", R.version$minor, status, sep="")cat(res)