Wrapper around logger::log_shiny_input_changes

So other Rapportek do not have to depend on logger package

NAMESPACE

@@ -50,6 +50,7 @@ export(listStagingData)
 export(loadRegData)
 export(loadStagingData)
 export(logFormat)
+export(logShinyInputChanges)
 export(logTimeFrame)
 export(loggerSetup)
 export(makeAutoReportTab)

R/appLog.R

@@ -36,3 +36,13 @@ loggerSetup <- function(
     logger::log_errors()
   }
 }
+
+#' Wrapper around logger::log_shiny_input_changes
+#'
+#' @param input passed from Shiny's server
+#'
+#' @export
+#'
+logShinyInputChanges <- function(input) {
+  logger::log_shiny_input_changes(input)
+}