Upgrade Blueprint to 5.10.2 (#100)

* feat: upgrade @blueprintjs/core to 5.10.2

* chore: bump package version

* chore: update CI to use newest version of shiny.react

* chore: update maintainer info

---------

Co-authored-by: Jakub Sobolewski <[email protected]>

Author: jakubsob

.github/workflows/ci.yml

@@ -20,6 +20,13 @@ jobs:
         with:
           extra-packages: local::. # Necessary to avoid object usage linter errors.
 
+      - name: Install shiny.react with React 18.3.1
+        if: always()
+        env:
+          GITHUB_PAT: ${{ secrets.GITHUB_TOKEN }}
+        run: |
+          Rscript -e 'install.packages("remotes"); remotes::install_github("Appsilon/shiny.react")'
+
       - name: R CMD check
         if: always()
         uses: r-lib/actions/check-r-package@v2

DESCRIPTION

@@ -1,9 +1,10 @@
 Package: shiny.blueprint
 Title: Palantir's 'Blueprint' for 'Shiny' Apps
-Version: 0.2.0
+Version: 0.2.0.900
 Authors@R:
   c(
-    person("Kamil", "Żyła", role = c("aut", "cre"), email = "[email protected]"),
+    person("Jakub", "Sobolewski", role = c("aut", "cre"), email = "[email protected]"),
+    person("Kamil", "Żyła", role = "aut", email = "[email protected]"),
     person("Filip", "Akkad", role = "aut", email = "[email protected]"),
     person("Filip", "Stachura", role = "aut", email = "[email protected]"),
     person("Paweł", "Chabros", role = "aut", email = "[email protected]"),
@@ -20,7 +21,7 @@ License: LGPL-3
 Encoding: UTF-8
 LazyData: true
 Roxygen: list(markdown = TRUE)
-RoxygenNote: 7.2.3
+RoxygenNote: 7.3.1
 VignetteBuilder: knitr
 Imports:
   checkmate,

inst/examples/Dialog.R

@@ -26,7 +26,7 @@ server <- function(id) {
         isOpen = isOpen(),
         onClose = triggerEvent(ns("closeDialog")),
         div(
-          className = "bp4-dialog-body",
+          className = "bp5-dialog-body",
           H5("Analytical applications"),
           tags$p(
             "User interfaces that enable people to interact smoothly with data,",

inst/examples/Drawer.R

@@ -25,7 +25,7 @@ server <- function(id) {
         title = "Hello",
         icon = "info-sign",
         div(
-          class = "bp4-dialog-body",
+          class = "bp5-dialog-body",
           p("Lorem Ipsum is simply dummy text of the printing and typesetting industry.")
         )
       )

inst/examples/HTMLTable.R

@@ -12,7 +12,7 @@ ui <- function(id) {
       tags$tr(tags$td("shiny.blueprint"), tags$td("R JS"), tags$td("2"))
     ),
     tags$tfoot(
-      tags$tr(tags$td("Total", colspan = 2), tags$td("1508"))
+      tags$tr(tags$td("Total", colSpan = 2), tags$td("1508"))
     )
   )
 }

inst/examples/Label.R

@@ -4,7 +4,7 @@ library(shiny)
 ui <- function(id) {
   Label(
     "Label",
-    tags$input(class = "bp4-input")
+    tags$input(class = "bp5-input")
   )
 }
 

inst/examples/Menu.R

@@ -4,7 +4,7 @@ library(shiny)
 ui <- function(id) {
   Menu(
     style = "max-width: 200px",
-    className = "bp4-elevation-1",
+    className = "bp5-elevation-1",
     MenuDivider(title = "Edit"),
     MenuItem(icon = "cut", text = "Cut", label = "^X"),
     MenuItem(icon = "duplicate", text = "Copy", label = "^C"),

inst/examples/MultistepDialog.R

@@ -29,23 +29,23 @@ server <- function(id) {
         DialogStep(
           id = "step1",
           panel = div(
-            className = "bp4-dialog-body",
+            className = "bp5-dialog-body",
             p("This is a step 1")
           ),
           title = "Step 1"
         ),
         DialogStep(
           id = "step2",
           panel = div(
-            className = "bp4-dialog-body",
+            className = "bp5-dialog-body",
             p("This is a step 2")
           ),
           title = "Step 2"
         ),
         DialogStep(
           id = "step3",
           panel = div(
-            className = "bp4-dialog-body",
+            className = "bp5-dialog-body",
             p("This is a step 3")
           ),
           title = "Step 3"

inst/examples/Overlay.R

@@ -26,7 +26,7 @@ server <- function(id) {
         isOpen = isOpen(),
         onClose = triggerEvent(ns("closeOverlay")),
         Card(
-          className = "bp4-elevation-4 bp4-dark bp4-overlay-content",
+          className = "bp5-elevation-4 bp5-dark bp5-overlay-content",
           interactive = TRUE,
           H5("Analytical applications"),
           tags$p(

inst/examples/Popover.R

@@ -17,7 +17,7 @@ server <- function(id) {
     output$ui <- renderReact({
       Popover(
         isOpen = isOpen(),
-        target = Button.shinyInput(ns("hello"), "Say Hello", intent = "primary"),
+        Button.shinyInput(ns("hello"), "Say Hello", intent = "primary"),
         usePortal = FALSE,
         content = tags$div(
           style = "padding: 1em",