R/allow.R

In cboettig/build.eml: Build Ecological Metadata Language Files

#' allow 
#'
#' allow 
#'
#'
#' @inheritParams common_attributes 
#' @param principal The user or group (principal) for which the access control applies. See [principal()]
#' @param permission The type of permission being granted or denied. See [permission()]
#'
#' @return a allow list object
#'
#' @export

 allow <- function(principal = NULL,
 permission = NULL){ 
Filter(Negate(is.null),
 list(
principal = principal,
permission = permission))}