From bd72b36bb6296025a0d0b1a4f11e5a0ddb93f9a1 Mon Sep 17 00:00:00 2001
From: timelyportfolio <kent.russell@timelyportfolio.com>
Date: Fri, 24 Nov 2023 10:17:48 -0600
Subject: [PATCH] retail `list` in `reactR::component` class list to #82 to
 insure `htmlwidgets` will recurse through extracting `htmlwidgets::JS` calls

---
 DESCRIPTION    | 4 ++--
 NEWS.md        | 8 ++++++++
 R/reacttools.R | 2 +-
 3 files changed, 11 insertions(+), 3 deletions(-)

diff --git a/DESCRIPTION b/DESCRIPTION
index 79d5749..6b90bff 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,8 +1,8 @@
 Package: reactR
 Type: Package
 Title: React Helpers
-Version: 0.5.0
-Date: 2023-10-01
+Version: 0.5.1
+Date: 2023-11-24
 Authors@R: c(
       person(
         "Facebook", "Inc"
diff --git a/NEWS.md b/NEWS.md
index e9032fc..e404922 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -1,3 +1,11 @@
+# reactR 0.5.1
+
+* retain `list` in `reactR::component` classes #82
+
+# reactR 0.5.0
+
+* Update react to `18.2.0`
+
 # reactR 0.4.4
 
 * Update react to `16.12.0`
diff --git a/R/reacttools.R b/R/reacttools.R
index 4f65f6b..2f2516e 100644
--- a/R/reacttools.R
+++ b/R/reacttools.R
@@ -32,7 +32,7 @@ component <- function(name, varArgs = list()) {
     stop("Component name must be specified and start with an upper case character")
   }
   component <- htmltools::tag(name, varArgs)
-  structure(component, class = c("reactR_component", oldClass(component)))
+  structure(component, class = c("reactR_component", oldClass(component), "list"))
 }
 
 #' React component builder.