Increment version number to 1.0.1

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: AVSDevR.A11yShinyInputs
 Title: Accesible Alternatives to Shiny Inputs
-Version: 1.0.0
+Version: 1.0.1
 Authors@R: 
     person("Craig", "Williams", , "craig@avsdev.uk", role = c("aut", "cre"))
 Description: Provides accessible alternatives to shiny inputs such as the radio

R/a11yFileInput.R

@@ -54,7 +54,9 @@ a11yFileInput <- function(
       htmltools::tags$div(
         class = "input-group-btn input-group-prepend",
         htmltools::tags$span(
-          class = "btn btn-default btn-file", buttonLabel
+          class = "btn btn-default btn-file",
+          onclick = paste0("$('#", inputId, "').click();"),
+          buttonLabel
         ),
         inputTag
       ),