bug fix numericInput_dsfr

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: shinygouv
 Title: Implement the DSFR for your shiny applications
-Version: 1.0.3
+Version: 1.0.4
 Authors@R: c(
     person("Juliette", "ENGELAERE-LEFEBVRE", , "juliette.engelaere-lefebvre@developpement-durable.gouv.fr", role = c("aut", "cre")),
     person("Sébastien", "Rochette", , "sebastien@thinkr.fr", role = "aut",

NEWS.md

@@ -1,3 +1,9 @@
+# shinygouv 1.0.4
+
+## Fix 
+
+* numericInput_dsfr : correction du template qui ne fonctionnait plus avec shiny v1.8.1
+
 # shinygouv 1.0.3
 
 ## Fix 

R/numericinput_dsfr.R

@@ -22,8 +22,7 @@
 #'
 #'   ui <- fluidPage_dsfr(
 #'     header = header_dsfr(
-#'       intitule = "Intitule",
-#'       officiel = "Officiel",
+#'       intitule = c("Intitule", "officiel"),
 #'       nom_site_service = "Nom du site / service",
 #'       baseline = "baseline - precisions sur l organisation",
 #'       class = "fr-m-1w"

R/updatenumericinput_dsfr.R

@@ -22,8 +22,7 @@
 #'
 #'   ui <- fluidPage_dsfr(
 #'     header = header_dsfr(
-#'       intitule = "Intitule",
-#'       officiel = "Officiel",
+#'       intitule = c("Intitule", "Officiel"),
 #'       nom_site_service = "Nom du site / service",
 #'       baseline = "baseline - precisions sur l organisation",
 #'       class = "fr-m-1w"

dev/flat_composants/flat_numericInput.Rmd

@@ -201,8 +201,7 @@ if (interactive()) {
 
   ui <- fluidPage_dsfr(
     header = header_dsfr(
-      intitule = "Intitule",
-      officiel = "Officiel",
+      intitule = c("Intitule", "officiel"),
       nom_site_service = "Nom du site / service",
       baseline = "baseline - precisions sur l organisation",
       class = "fr-m-1w"
@@ -386,8 +385,7 @@ if (interactive()) {
 
   ui <- fluidPage_dsfr(
     header = header_dsfr(
-      intitule = "Intitule",
-      officiel = "Officiel",
+      intitule = c("Intitule", "Officiel"),
       nom_site_service = "Nom du site / service",
       baseline = "baseline - precisions sur l organisation",
       class = "fr-m-1w"

inst/v1.9.3/composant/numericinput.html

@@ -2,5 +2,5 @@
   <label class="fr-label" id="{{inputId}}-label" for="{{inputId}}">
     {{label}}
   </label>
-  <input  id="{{inputId}}" value="{{value}}" min="{{min}}" max="{{max}}" step="{{step}}" class="fr-input shiny-bound-input" pattern="[0-9]*" inputmode="numeric" type="number" name="text-input-number">
+  <input  id="{{inputId}}" value="{{value}}" min="{{min}}" max="{{max}}" step="{{step}}" class="fr-input shiny-input-number" pattern="[0-9]*" inputmode="numeric" type="number" name="text-input-number">
 </div>