R/select.R

In crazycapivara/imapr: An R Interface to IMAP

#' SELECT
#'
#' Select mailbox.
#'
#' @param imap imap object
#' @param folder mailbox name
#'
#' @return updated imap object
#' @export
#'
#' @examples
#' imap <- IMAP("imaps://imap.gmail.com") %>%
#'    SELECT("INBOX")
#'
#' \dontrun{
#'    imap %>% SEARCH("UNSEEN") %>% execute()
#' }
#'
SELECT <- function(imap, folder){
  imap$path <- escape_url_(folder)
  imap
}