fix(navbar_options): Apply attributes and theme

Fixes #1941

Author: gadenbuie

shiny/ui/_navs.py

@@ -1320,7 +1320,12 @@ def layout(self, nav: Tag, content: Tag) -> TagList:
             nav = div(nav, id=collapse_id, class_="collapse navbar-collapse")
 
         nav_container.append(nav)
-        nav_final = tags.nav({"class": "navbar navbar-expand-md"}, nav_container)
+        nav_final = tags.nav(
+            {"class": "navbar navbar-expand-md"},
+            nav_container,
+            {"data-bs-theme": self.navbar_options.theme},
+            **self.navbar_options.attrs,
+        )
 
         if self.navbar_options.position != "static-top":
             nav_final.add_class(self.navbar_options.position)

tests/playwright/shiny/components/nav/navset_bar_options/app.py

@@ -0,0 +1,23 @@
+from shiny import App, ui
+
+app_ui = ui.page_navbar(
+    ui.nav_panel(
+        "Page 1",
+        ui.navset_bar(
+            ui.nav_panel("Inner 1", "Inner content"),
+            title="Inner navbar",
+            id="inner_navset_bar",
+            navbar_options=ui.navbar_options(class_="bg-light", theme="light"),
+        ),
+    ),
+    title="Title",
+    id="page_navbar",
+    navbar_options=ui.navbar_options(class_="bg-primary", theme="dark"),
+)
+
+
+def server(input, output, session):
+    pass
+
+
+app = App(app_ui, server)

tests/playwright/shiny/components/nav/navset_bar_options/test_navset_bar_options.py

@@ -0,0 +1,18 @@
+import re
+
+from playwright.sync_api import Page, expect
+
+from shiny.playwright import controller
+from shiny.run import ShinyAppProc
+
+
+def test_navset_bar_options(page: Page, local_app: ShinyAppProc) -> None:
+    page.goto(local_app.url)
+
+    page_navbar = controller.PageNavbar(page, "page_navbar")
+    expect(page_navbar._loc_navbar).to_have_class(re.compile(r"(^|\s)bg-primary(\s|$)"))
+    expect(page_navbar._loc_navbar).to_have_attribute("data-bs-theme", "dark")
+
+    inner_navbar = controller.NavsetBar(page, "inner_navset_bar")
+    expect(inner_navbar._loc_navbar).to_have_class(re.compile(r"(^|\s)bg-light(\s|$)"))
+    expect(inner_navbar._loc_navbar).to_have_attribute("data-bs-theme", "light")