Displaying 1 result from an estimated 1 matches for "savewd".
Did you mean:
saved
2013 Sep 04
4
Comments requested on "changedFiles" function
...if (missing(file.info) || isTRUE(file.info)) file.info <-
snapshot$file.info
if (identical(file.info, FALSE)) file.info <- NULL
if (missing(md5sum)) md5sum <- snapshot$md5sum
if (missing(full.names)) full.names <- snapshot$full.names
pre <- snapshot$pre
savewd <- getwd()
on.exit(setwd(savewd))
setwd(snapshot$wd)
args <- snapshot$args
newargs <- list(...)
args[names(newargs)] <- newargs
post <- dosnapshot(args)$info
prenames <- rownames(pre)
postnames <- rownames(post)
added <- setdiff...