From e3542ba6c51179d4bccd46c24a61727b81c4f606 Mon Sep 17 00:00:00 2001 From: merlinoa Date: Sun, 9 Apr 2017 12:02:40 -0700 Subject: [PATCH] updates for CRAN notes --- DESCRIPTION | 2 +- R/feedback.R | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index c797c54..8032c94 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -2,7 +2,7 @@ Package: shinyFeedback Type: Package Title: Displays User Feedback Next to Shiny Inputs Version: 0.0.3 -Date: 2016-12-19 +Date: 2017-04-09 Authors@R: person("Andy", "Merlino", email = "merlinoa88@gmail.com", role = c("aut", "cre")) Description: Easily display user feedback next to Shiny inputs. The feedback message is displayed when the feedback condition evaluates to TRUE. diff --git a/R/feedback.R b/R/feedback.R index 8316dc2..b4951d4 100644 --- a/R/feedback.R +++ b/R/feedback.R @@ -54,7 +54,7 @@ feedback <- function(inputId, condition, text = NULL, color = NULL, # some argument checks stopifnot(is.character(inputId)) stopifnot(is.logical(condition)) - icon <- as.character(shiny:::validateIcon(icon)) + icon <- as.character(icon) stopifnot(is.character(text) || is.null(text)) stopifnot(is.character(color) || is.null(color))