From 6519cf0cda3b6371042546417d8eeb1993565f70 Mon Sep 17 00:00:00 2001
From: arnfinn <arnfinn.steindal@gmail.com>
Date: Mon, 25 Nov 2024 11:35:40 +0100
Subject: [PATCH] Wrapper around logger::log_shiny_input_changes

So other Rapportek do not have to depend on logger package
---
 NAMESPACE                   |  1 +
 R/appLog.R                  | 10 ++++++++++
 man/logShinyInputChanges.Rd | 14 ++++++++++++++
 3 files changed, 25 insertions(+)
 create mode 100644 man/logShinyInputChanges.Rd

diff --git a/NAMESPACE b/NAMESPACE
index d99fa1a3..8d1f6cb4 100644
--- a/NAMESPACE
+++ b/NAMESPACE
@@ -50,6 +50,7 @@ export(listStagingData)
 export(loadRegData)
 export(loadStagingData)
 export(logFormat)
+export(logShinyInputChanges)
 export(logTimeFrame)
 export(loggerSetup)
 export(makeAutoReportTab)
diff --git a/R/appLog.R b/R/appLog.R
index 39d0f11d..84111c2f 100644
--- a/R/appLog.R
+++ b/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)
+}
diff --git a/man/logShinyInputChanges.Rd b/man/logShinyInputChanges.Rd
new file mode 100644
index 00000000..06f69f27
--- /dev/null
+++ b/man/logShinyInputChanges.Rd
@@ -0,0 +1,14 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/appLog.R
+\name{logShinyInputChanges}
+\alias{logShinyInputChanges}
+\title{Wrapper around logger::log_shiny_input_changes}
+\usage{
+logShinyInputChanges(input)
+}
+\arguments{
+\item{input}{passed from Shiny's server}
+}
+\description{
+Wrapper around logger::log_shiny_input_changes
+}