R/phone.R

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

#' phone 
#'
#' phone 
#'
#'
#' @inheritParams common_attributes 
#' @param phonetype The type of the phone to which this number applies
#'
#' @return a phone list object
#'
#' @export

 phone <- function(phonetype = NULL){ 
Filter(Negate(is.null),
 list(
phonetype = phonetype))}