diff --git a/DESCRIPTION b/DESCRIPTION index 64cf923..64dad2f 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -10,10 +10,10 @@ Authors@R: person('Luis', 'Morís Fernández', email = 'luis.moris.fernandez.ext@boehringer-ingelheim.com', role = c('aut')), person('Jessica', 'Knizia', email = 'jessica.knizia@boehringer-ingelheim.com', role = c('ctb')) ) -Description: DaVinci’s dv.listings module displays a data listing of different dataset domains in tabular form. +Description: DaVinci’s dv.listings package provides modules to display different dataset domains as listings. Users can select the dataset to be shown, and specify which columns of the dataset should be displayed. The displayed columns can be sorted and filtered. - Moreover, the listing can be filtered to show only entries containing a keyword entered by the user. + Moreover, the listing can be filtered to show only entries containing a keyword specified by the user. The module is not limited to usage of one data source, most notably, it can handle data from ADaM or SDTM. License: Apache License (>= 2) Encoding: UTF-8 @@ -41,7 +41,7 @@ Imports: shinyWidgets (>= 0.8.0), tibble (>= 3.2.1), dv.manager (>= 2.0.0-17) -RoxygenNote: 7.3.0 +RoxygenNote: 7.3.1 Roxygen: list(markdown = TRUE) Remotes: boehringer-ingelheim/dv.manager@main VignetteBuilder: knitr diff --git a/NAMESPACE b/NAMESPACE index 90287bb..cbcb544 100644 --- a/NAMESPACE +++ b/NAMESPACE @@ -4,8 +4,6 @@ export("%>%") export(convert_data) export(listings_UI) export(listings_server) -export(mock_listings_mm) -export(mock_simple_listing_mm) export(mod_listings) import(shiny) importFrom(magrittr,"%>%") diff --git a/NEWS.md b/NEWS.md index 9522275..a4c29a6 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,6 +1,6 @@ # dv.listings 3.1.0 -package was renamed to dv.listings +Package was renamed to dv.listings. # dv.table 3.0.1 diff --git a/R/helpers.R b/R/helpers.R index 2962f44..d9ebbb1 100644 --- a/R/helpers.R +++ b/R/helpers.R @@ -8,8 +8,6 @@ #' "No label" for missing labels. #' #' @keywords internal -#' - get_labels <- function(dataset) { # Catch special cases (e.g. when global filter returns empty dataset) return_null <- any(length(dataset) == 0, is.null(dataset)) @@ -55,7 +53,6 @@ get_labels <- function(dataset) { #' @return Character vector of the type ` [