Removing double prefixes bug in produce_or_load

src/saving_files.jl

@@ -80,15 +80,14 @@ function produce_or_load(f::Function, config, path::String = "";
         """
     end
     if filename === nothing
-        filename = config -> savename(config; kwargs...)
+        filename = config -> savename(prefix, config, suffix; kwargs...)
     end
     # Prepare absolute file name
     if filename isa AbstractString
-        name = filename
+        name = append_prefix_suffix(filename, prefix, suffix)
     else
         name = string(filename(config))
     end
-    name = append_prefix_suffix(name, prefix, suffix)
     file = joinpath(path, name)
     # Run the remaining logic on whether to produce or load
     if !force && isfile(file)

test/savefiles_tests.jl

@@ -307,6 +307,18 @@ end
     rm(path; recursive = true, force = true)
 end
 
+# Testing proper filenames when default_prefix was modified. See https://github.com/JuliaDynamics/DrWatson.jl/issues/392
+@testset "@produce_or_load with default_prefix modified" begin
+    path = mktempdir()
+
+    DrWatson.default_prefix(ntuple::NamedTuple) = "Prefix_"
+
+    sim, path = produce_or_load(f, simulation, "")
+    @test path == savename(simulation)
+
+    rm(path)
+    DrWatson.default_prefix(ntuple::NamedTuple) = ""
+end
 
 
 ################################################################################