diff --git a/DESCRIPTION b/DESCRIPTION
index d844e47..d7933e1 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: AVSDevR.A11yShinyInputs
 Title: Accesible Alternatives to Shiny Inputs
-Version: 0.1.0
+Version: 0.1.0.9000
 Authors@R: 
     person("Craig", "Williams", , "craig@avsdev.uk", role = c("aut", "cre"))
 Description: Provides accessible alternatives to shiny inputs such as the radio
diff --git a/R/a11yCheckboxGroupInput.R b/R/a11yCheckboxGroupInput.R
index a34787c..4befe3e 100644
--- a/R/a11yCheckboxGroupInput.R
+++ b/R/a11yCheckboxGroupInput.R
@@ -38,13 +38,15 @@ a11yCheckboxGroupInput <- function(
       href = "#",
       onclick = "return checkAll(event)",
       "select all",
-      class = "link select-all"
+      class = "link select-all",
+      `aria-label` = paste("Select all", label)
     )
     sn <- htmltools::tags$a(
       href = "#",
       onclick = "return clearAll(event)",
       "clear all",
-      class = "link select-none"
+      class = "link select-none",
+      `aria-label` = paste("Clear all", label)
     )
     selectAll <- htmltools::tags$div(
       "(", sa, "/", sn, ")", class = "select-all-container"