Commit 91d70295 authored by Chris Lamb's avatar Chris Lamb 💬

Call R's "deparse" function to ensure that we do not error out and revert to a...

Call R's "deparse" function to ensure that we do not error out and revert to a binary diff when processing .rdb files with internal "vector" types as they do not automatically coerce to strings.
parent f23f2b44
......@@ -44,7 +44,7 @@ for (x in ls(all.names = TRUE, sorted = TRUE)) {
cat("\n{\n", sep = "");
for (y in ls(obj, all.names = TRUE, sorted = TRUE)) {
obj2 = get(y, envir = obj);
cat(sprintf(" \"%s\" = \"%s\"\n", y, obj2), sep = "");
cat(sprintf(" \"%s\" = \"%s\"\n", y, deparse(obj2)), sep = "");
}
cat("}\n");
} else {
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment