rkw/stAndrews
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Make Docs subdivisions collapsible via nested
All checks were successful
Deploy stAndrews / deploy (push) Successful in 18s
Details

Browse Source 
accordion
This commit is contained in:
Rob Wiederstein
2026-03-13 15:28:13 -04:00
parent 6614bfeb04
commit 6514c23398
1 changed files with 30 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
R/app_ui.R
View File

@@ -245,30 +245,32 @@ create_ui <- function() {
), ),
f7AccordionItem( f7AccordionItem(
title = "Docs", title = "Docs",
f7BlockTitle("St. Andrews Park", size = "medium"), f7Accordion(
f7Block( id = "docs_accordion",
f7AccordionItem(
title = "St. Andrews Park",
f7List( f7List(
inset = TRUE, dividers = TRUE, strong = TRUE, outline = FALSE, inset = TRUE, dividers = TRUE, strong = TRUE, outline = FALSE,
f7ListItem(title = "Covenants", href = "docs/st_andrews/2000_01_01_st_andrews_covenants.pdf"), f7ListItem(title = "Covenants", href = "docs/st_andrews/2000_01_01_st_andrews_covenants.pdf"),
f7ListItem(title = "Map (unrecorded)", href = "docs/st_andrews/2004_06_23_sap_map.pdf") f7ListItem(title = "Map (unrecorded)", href = "docs/st_andrews/2004_06_23_sap_map.pdf")
) )
), ),
f7BlockTitle("Patios 2", size = "medium"), f7AccordionItem(
f7Block( title = "Patios 2",
f7List( f7List(
inset = TRUE, dividers = TRUE, strong = TRUE, outline = FALSE, inset = TRUE, dividers = TRUE, strong = TRUE, outline = FALSE,
f7ListItem(title = "Plat", href = "docs/patios_2/1997_08_12_patios_2_plat.pdf") f7ListItem(title = "Plat", href = "docs/patios_2/1997_08_12_patios_2_plat.pdf")
) )
), ),
f7BlockTitle("Patios 3", size = "medium"), f7AccordionItem(
f7Block( title = "Patios 3",
f7List( f7List(
inset = TRUE, dividers = TRUE, strong = TRUE, outline = FALSE, inset = TRUE, dividers = TRUE, strong = TRUE, outline = FALSE,
f7ListItem(title = "Plat", href = "docs/patios_3/1998_11_17_patios_3_plat.pdf") f7ListItem(title = "Plat", href = "docs/patios_3/1998_11_17_patios_3_plat.pdf")
) )
), ),
f7BlockTitle("Villas 2", size = "medium"), f7AccordionItem(
f7Block( title = "Villas 2",
f7List( f7List(
inset = TRUE, dividers = TRUE, strong = TRUE, outline = FALSE, inset = TRUE, dividers = TRUE, strong = TRUE, outline = FALSE,
f7ListItem(title = "Plat", href = "docs/villas_2/1998_09_14_villas_2_plat.pdf") f7ListItem(title = "Plat", href = "docs/villas_2/1998_09_14_villas_2_plat.pdf")
@@ -277,6 +279,7 @@ create_ui <- function() {
) )
) )
) )
)
### end tabs---- ### end tabs----
), ),
### begin scripts ---- ### begin scripts ----