Update digestR.R

DDesmonts · web-flow · commit 5bf58daf51c8 · 2024-09-17T15:39:55.000-06:00
diff --git a/R/digestR.R b/R/digestR.R
@@ -6589,7 +6589,7 @@ file_open <- function(fileName, ...){
     }
     
     ## Log successful file opening
-    log_message(paste("file opened", basename(usrList[i]), ":", new.file))
+    #log_message(paste("file opened", basename(usrList[i]), ":", new.file))
     
     ## Make a new entry in the file folder if file is not already present 
     filePar <- new.file$file.par

Original file line number	Diff line number	Diff line change
`@@ -6589,7 +6589,7 @@ file_open <- function(fileName, ...){`
`6589`	`6589`	`}`
`6590`	`6590`
`6591`	`6591`	`## Log successful file opening`
`6592`		`- log_message(paste("file opened", basename(usrList[i]), ":", new.file))`
	`6592`	`+ #log_message(paste("file opened", basename(usrList[i]), ":", new.file))`
`6593`	`6593`
`6594`	`6594`	`## Make a new entry in the file folder if file is not already present`
`6595`	`6595`	`filePar <- new.file$file.par`