Pass tests

R/modules.R

@@ -26,6 +26,12 @@ createSessionProxy <- function(parentSession, ...) {
   x
 }
 
+#' Invoke a module's UI
+#'
+#' @param module A function or path
+#' @param id An ID string
+#' @param ... Additional parameters to pass to module function
+#' @return A tag, or a list of tags, or a \code{tagList} of tags
 #' @export
 moduleUI <- function(module, id, ...) {
   if (is.function(module)) {

inst/staticdocs/index.r

@@ -173,7 +173,9 @@ sd_section("Plot interaction",
 sd_section("Modules",
   "Functions for modularizing Shiny apps",
   c(
-    "NS"
+    "NS",
+    "moduleUI",
+    "callModule"
   )
 )
 sd_section("Embedding",

man/moduleUI.Rd

@@ -0,0 +1,22 @@
+% Generated by roxygen2 (4.1.1): do not edit by hand
+% Please edit documentation in R/modules.R
+\name{moduleUI}
+\alias{moduleUI}
+\title{Invoke a module's UI}
+\usage{
+moduleUI(module, id, ...)
+}
+\arguments{
+\item{module}{A function or path}
+
+\item{id}{An ID string}
+
+\item{...}{Additional parameters to pass to module function}
+}
+\value{
+A tag, or a list of tags, or a \code{tagList} of tags
+}
+\description{
+Invoke a module's UI
+}
+