diff --git a/R/zzz.R b/R/zzz.R index 64ae926..2ac2f05 100644 --- a/R/zzz.R +++ b/R/zzz.R @@ -8,7 +8,7 @@ attach_library <- function(pkg) { } .onAttach <- function(...) { - ambhtmx_core <- c("ambiorix", "htmltools", "tibble", "dplyr", "purrr", "stringr", "glue") + ambhtmx_core <- c("ambiorix", "htmltools", "tibble", "dplyr", "purrr", "stringr", "glue", "zeallot") invisible(suppressPackageStartupMessages( lapply(ambhtmx_core, attach_library) diff --git a/inst/examples/01-counter.R b/inst/examples/01-counter.R index 548f570..5925bc0 100644 --- a/inst/examples/01-counter.R +++ b/inst/examples/01-counter.R @@ -1,14 +1,13 @@ library(ambhtmx) # devtools::load_all() -library(ambiorix) -library(tidyverse) -library(zeallot) -library(glue) -library(htmltools) #' Starting the app counter <- 0 -c(app, context, operations) %<-% ambhtmx_app() +tryCatch({ + c(app, context, operations) %<-% ambhtmx_app() + }, + error = \(e) print(e) +) #' Main page of the app app$get("/", \(req, res){ diff --git a/inst/examples/02-ggplot2.R b/inst/examples/02-ggplot2.R index 48254a4..38ab8a5 100644 --- a/inst/examples/02-ggplot2.R +++ b/inst/examples/02-ggplot2.R @@ -1,10 +1,5 @@ library(ambhtmx) # devtools::load_all() -library(ambiorix) -library(tidyverse) -library(zeallot) -library(glue) -library(htmltools) #' Starting the app counter <- 0