From a7110e1238c8f1c5259938ddd039baf7bded861a Mon Sep 17 00:00:00 2001
From: RafaelFNovi <95547907+RafaelFNovi@users.noreply.github.com>
Date: Tue, 10 May 2022 18:01:07 -0300
Subject: [PATCH] Update app.R

Hi only a little chance to mandatory fields work.
---
 app.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/app.R b/app.R
index f63d124..bdbd7a9 100644
--- a/app.R
+++ b/app.R
@@ -99,7 +99,7 @@ entry_form <- function(button_id){
               sliderInput("age", "Age", 0, 100, 1, ticks = TRUE, width = "354px"),
               textAreaInput("comment", "Comment", placeholder = "", height = 100, width = "354px"),
               helpText(labelMandatory(""), paste("Mandatory field.")),
-              actionButton(button_id, "Submit")
+              actionButton(button_id, "submit")  # line  80 is s ...
             ),
             easyClose = TRUE
           )