From a12197eb536fb40bcdd47f0749218e1202e55ebe Mon Sep 17 00:00:00 2001
From: DivadNojnarg <dgranjon@ymail.com>
Date: Thu, 16 Jul 2020 13:51:01 +0200
Subject: [PATCH] fix GA

---
 .Rbuildignore                 |  1 +
 DESCRIPTION                   |  3 +--
 LICENSE                       |  2 ++
 LICENSE.md                    | 21 +++++++++++++++++++++
 R/inputs.R                    |  1 +
 R/utils-shiny.R               |  9 +++++++++
 man/update_radio_input_386.Rd |  2 ++
 7 files changed, 37 insertions(+), 2 deletions(-)
 create mode 100644 LICENSE
 create mode 100644 LICENSE.md

diff --git a/.Rbuildignore b/.Rbuildignore
index 80b74de..2f91281 100644
--- a/.Rbuildignore
+++ b/.Rbuildignore
@@ -5,3 +5,4 @@
 ^docs$
 ^pkgdown$
 ^\.github$
+^LICENSE\.md$
diff --git a/DESCRIPTION b/DESCRIPTION
index 9501740..3ee9795 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -7,8 +7,7 @@ Authors@R:
            role = c("aut", "cre"),
            email = "dgranjon@ymail.com")
 Description: What the package does (one paragraph).
-License: `use_mit_license()`, `use_gpl3_license()` or friends to
-    pick a license
+License: MIT + file LICENSE
 Encoding: UTF-8
 LazyData: true
 Roxygen: list(markdown = TRUE)
diff --git a/LICENSE b/LICENSE
new file mode 100644
index 0000000..f995860
--- /dev/null
+++ b/LICENSE
@@ -0,0 +1,2 @@
+YEAR: 2020
+COPYRIGHT HOLDER: David Granjon
diff --git a/LICENSE.md b/LICENSE.md
new file mode 100644
index 0000000..5a4f4fa
--- /dev/null
+++ b/LICENSE.md
@@ -0,0 +1,21 @@
+# MIT License
+
+Copyright (c) 2020 David Granjon
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in all
+copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+SOFTWARE.
diff --git a/R/inputs.R b/R/inputs.R
index d808720..268f360 100644
--- a/R/inputs.R
+++ b/R/inputs.R
@@ -282,6 +282,7 @@ radio_input_386 <- function(inputId, label, choices = NULL, selected = NULL,
 #' Change the value of a radio input on the client
 #'
 #' @inheritParams radio_input_386
+#' @param session The session object passed to function given to shinyServer.
 #'
 #' @seealso [radio_input_386()]
 #'
diff --git a/R/utils-shiny.R b/R/utils-shiny.R
index d7b4fd2..2fd0577 100644
--- a/R/utils-shiny.R
+++ b/R/utils-shiny.R
@@ -54,6 +54,15 @@ shinyInputLabel <- function(inputId, label = NULL) {
   )
 }
 
+anyNamed <- function (x) {
+  if (length(x) == 0)
+    return(FALSE)
+  nms <- names(x)
+  if (is.null(nms))
+    return(FALSE)
+  any(nzchar(nms))
+}
+
 # This function takes in either a list or vector for `choices` (and
 # `choiceNames` and `choiceValues` are passed in as NULL) OR it takes
 # in a list or vector for both `choiceNames` and `choiceValues` (and
diff --git a/man/update_radio_input_386.Rd b/man/update_radio_input_386.Rd
index 26c9637..9e3694a 100644
--- a/man/update_radio_input_386.Rd
+++ b/man/update_radio_input_386.Rd
@@ -15,6 +15,8 @@ update_radio_input_386(
 )
 }
 \arguments{
+\item{session}{The session object passed to function given to shinyServer.}
+
 \item{inputId}{The \code{input} slot that will be used to access the value.}
 
 \item{label}{Display label for the control, or \code{NULL} for no label.}