rstudio / bslib

Tools for theming Shiny and R Markdown via Bootstrap 3, 4, or 5.
https://rstudio.github.io/bslib/
Other
486 stars 58 forks source link

"sketchy" theme: checkboxes look off with bootstrap 5 #382

Closed MadhulikaTanuboddi closed 3 years ago

MadhulikaTanuboddi commented 3 years ago
  1. Run the following RMD
---
title: "Flexdashboard theming demo"
runtime: shiny
output: 
  flexdashboard::flex_dashboard:
    orientation: rows
    theme: 
      version: 5
    social: menu
    source_code: embed
    navbar:
      - { title: "About", href: "https://google.com", align: right, icon: glyphicon-time}
      - { title: "Home", href: "https://google.com", align: right, icon: fa-facebook }
---

```{r, include=FALSE}
library(flexdashboard)
library(ggplot2)
bslib::bs_themer()
thematic::thematic_rmd(font = "pacifico",bg = "black")

TAB1 =====================================

Column {data-width=650 .tabset}

Chart A

checkboxInput("checkbox", label = "Choice A", value = TRUE)
checkboxGroupInput("checkGroup",
          label = "Checkbox group",
          choices = list("Choice 1" = 1, "Choice 2" = 2,
                         "Choice 3" = 3),
          selected = 1)


2. Select "sketchy" theme
3. Notice the checkboxes (in the dashboard and also in the interactive themer)

<img width="1177" alt="sketchy_theme_checkboxes_bootstrap_5" src="https://user-images.githubusercontent.com/5369655/138189994-bffaee92-9829-4761-bfa7-bf3082b727eb.png">
cpsievert commented 3 years ago

A more minimal example:

browsable(fluidPage(
  theme = bslib::bs_theme(
    version = 5,
    bootswatch = "sketchy"
  ), 
  checkboxGroupInput("foo", "Sketchy", c("a", "b", "c"), selected = "a")
))
Screen Shot 2021-10-21 at 12 57 49 PM
github-actions[bot] commented 1 year ago

This issue has been automatically locked. If you believe you have found a related problem, please open a new issue (with a reproducible example or feature request) and link to this issue.