From 584ff51878130d2e31ad0da3d2a37768f139c552 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Fri, 19 Jun 2015 12:46:18 -0700 Subject: [PATCH] output time in log --- trunk/R/log.R | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/trunk/R/log.R b/trunk/R/log.R index 3d74bae..e77703c 100644 --- a/trunk/R/log.R +++ b/trunk/R/log.R @@ -6,7 +6,8 @@ log_clear <- function() { log_add <- function(text,print=T) { if (print) { - message(text) + message(paste(sep="", + "[",strftime(Sys.time(),format="%H:%M:%OS6"),"] ",text)) } assign('log_messages',c(log_messages, text),envir=.GlobalEnv) } -- 2.39.2