R/httpget_session_messages.R

Defines functions httpget_session_messages

httpget_session_messages <- function(filepath, requri){
  
  #load data
  myeval <- readRDS(sessionfile <- file.path(filepath, ".REval"));
  mymsg <- extract(myeval, "message");
  mymsg <- lapply(mymsg, "[[", "message");
  
  #render
  reqformat <- requri[1];
  httpget_object(mymsg, reqformat, "messages", "text");
}
jeroen/opencpu documentation built on Aug. 21, 2023, 12:09 p.m.