Commit e3e4b248 authored by Holger Brandl's avatar Holger Brandl

changed to just add dot prefix if results_prefix is defined

parent e3b6c852
......@@ -573,6 +573,8 @@ table_browser <- function(df, caption=deparse(substitute(df)), ...){
#results_prefix = "env_data_prep"
add_prefix = function(filename) {
## prefix a name with a project-prefix. Requires that results_prefix to be defined
file.path(dirname(filename), paste0(results_prefix, ".", basename(filename)))
prefixName=if_else(str_length(results_prefix)==0, basename(filename), paste0(results_prefix, ".", basename(filename)))
file.path(dirname(filename), prefixName)
}
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