v2.3.3

stla · Oct 10, 2023 · 83b18b5 · 83b18b5
1 parent 7a5607b
commit 83b18b5
Show file tree

Hide file tree

Showing 4 changed files with 17 additions and 8 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Type: Package
 Package: jsTreeR
 Title: A Wrapper of the JavaScript Library 'jsTree'
-Version: 2.3.2
+Version: 2.3.3
 Authors@R: c(
     person("Stéphane", "Laurent", , "laurent_step@outlook.fr", role = c("aut", "cre")),
     person("jQuery contributors", role = c("ctb", "cph"),

diff --git a/NEWS.md b/NEWS.md
@@ -1,3 +1,8 @@
+# jsTreeR 2.3.3 (2023-10-10)
+
+- Added new JavaScript events related to nodes: opened, closes, and selected.
+
+
 # jsTreeR 2.3.2 (2023-07-15)
 
 - The `.onAttach` instance has been replaced with a `.onLoad` instance.

diff --git a/cran-comments.md b/cran-comments.md
@@ -1,9 +1,8 @@
 ## Test environments
 
-* Linux Mint, R 4.2.2
+* Windows 10, R-4.3.1
 * win-builder (devel)
-* mac-builder
-* Ubuntu 20, via Github action
+* Ubuntu, via Github action
 
 
 ## R CMD check results

diff --git a/inst/essais/bug_ismisehregal.R b/inst/essais/bug_ismisehregal.R
@@ -22,15 +22,20 @@ server <- function(input, output, session){
           list(text = "Leaf D", type = "child")
         )
       ),
-      list(text = "Branch 2", type = "parent", state = list(opened = TRUE))
+      list(text = "Branch 2", type = "parent")
     )
     jstree(nodes, contextMenu = TRUE)
   })
 
   output$opened <- renderText({
-    if(isTruthy(input[["mytree_full"]])){
-      paste("Is node 1 opened?:", input[["mytree_full"]][[1]]$state$opened)
-    }
+    req(input[["mytree_full"]])
+    paste0(
+      "Is node 1 opened?: ",
+      input[["mytree_full"]][[1]]$state$opened,
+      "\n",
+      "Is node 2 opened?: ",
+      input[["mytree_full"]][[2]]$state$opened
+    )
   })
 
   observe({