From f33086ea045319b8d5723fac30619cce7ce305e8 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?zxBIB=20Lech=C3=B3n=2CMiguel=20=28MED=20BDS=29=20EXTERNAL?=
 <miguel.lechon.ext@boehringer-ingelheim.com>
Date: Wed, 22 Jan 2025 13:49:37 +0100
Subject: [PATCH] Update shared snippet hashes to reflect changes.

---
 R/CM.R | 2 +-
 R/DR.R | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/CM.R b/R/CM.R
index 2efa4e9..74b3f0f 100644
--- a/R/CM.R
+++ b/R/CM.R
@@ -1,4 +1,4 @@
-# YT#VHadccc0c551b3269937d087c1e76ae699#VHde6a9599edfe700035a3a72b3c9bdf71#
+# YT#VHd74cfd54b905c92b95c251b87af2e842#VHadccc0c551b3269937d087c1e76ae699#
 CM <- local({ # _C_hecked _M_odule
   message_well <- function(title, contents, color = "f5f5f5") { # repeats #iewahg
     style <- sprintf(r"---(
diff --git a/R/DR.R b/R/DR.R
index 5e6790c..9ed676a 100644
--- a/R/DR.R
+++ b/R/DR.R
@@ -1,4 +1,4 @@
-# YT#VH2511139c3a21a7e842ec31e495d1d528#VHb37a04c06b0d1e8cb246df00cdd8945f#
+# YT#VH0eddf137f54ee67423da845c2e102fce#VH2511139c3a21a7e842ec31e495d1d528#
 DR <- local({ # _D_ressing _R_oom
   inline_shiny_input <- function(elem, label = NULL, name_selector = NULL, label_elem = NULL) {
     if (is.character(label) && length(label) == 1 && nchar(label) > 0) {