From 31403e005656cc950bf7a107e1f1a86c39dc54cb Mon Sep 17 00:00:00 2001 From: Ronak Shah Date: Sun, 2 Jul 2023 20:21:06 +0800 Subject: [PATCH] change HTML --- R/shinyRatings.R | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) diff --git a/R/shinyRatings.R b/R/shinyRatings.R index f6c8198..fe357c9 100644 --- a/R/shinyRatings.R +++ b/R/shinyRatings.R @@ -51,14 +51,13 @@ ratings_html <- function(n, disabled, inputId) { dynamic_html <- paste0( sprintf( - ' - - - ', - half_num, half_num_chr, inputId, half_num_chr, half_num, full_num, full_num_chr, inputId, full_num_chr, full_num + ' + + + ', + half_num, inputId, half_num_chr, inputId, inputId, half_num_chr, half_num, full_num, inputId, full_num_chr, inputId, inputId, full_num_chr, full_num ), collapse = '') - if(isTRUE(disabled)) { # Add disabled attribute to input elements dynamic_html <- gsub('