R/zzz.R

Defines functions .onAttach

.onAttach <- function(libname, pkgname) {

  # If sen2r settings dir does not exist, ask for creating it
  invisible(give_write_permission())

  # Welcome message
  packageStartupMessage(paste(
    "Welcome to sen2r. To use the package from a GUI, launch",
    " > sen2r()",
    "Documentation: https://sen2r.ranghetti.info",
    "\nIMPORTANT: since November 2023, SAFE archives can no longer",
    "be downloaded from the ESA Hub, so Google Cloud is the new default server.",
    "To be able to search and download inputs: ",
    "- install Google Cloud SDK (https://cloud.google.com/sdk/docs/install);",
    "- configure sen2r to use Google Cloud SDK launching the function:",
    " > check_gcloud()",
    # if (all(
    #   Sys.info()["sysname"] %in% c("Windows", "Darwin"),
    #   length(load_binpaths()) == 0
    # )) {
    #   paste(
    #     "\nIMPORTANT: sen2r depends on some external tools;",
    #     "before using it, it is strongly recommended to run function",
    #     " > check_sen2r_deps()",
    #     "to check them and install the missing ones.",
    #     sep = "\n"
    #   )
    # },
    sep = "\n"
  ))
  
}
ranghetti/sen2r documentation built on March 27, 2024, 10:30 p.m.