library("repo.data")

# Test that it works
# ch <- cran_history()
# repo.data:::no_internet(ch)
# stopifnot(colnames(ch) == c("Package", "Version", "Date.Pub", "Time.Pub", "User.Pub", "Date.Arch",
#                             "Time.Arch", "User.Arch", "Pub.Date", "Arch.Date", "Date.rm",
#                             "Time.rm", "User.rm", "rm.Date"))
# stopifnot(as.logical(nrow(ch)))
# ex <- cran_history("experDesign")