Fix evaluation of variables in file name

malaise · Aug 25, 2023 · a7edd73 · a7edd73
1 parent 8aa5dcc
commit a7edd73
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/reposit/trace-loggers.adb b/reposit/trace-loggers.adb
@@ -60,7 +60,7 @@ package body Trace.Loggers is
       begin
         Flow_Is_Stderr := True;
         File_Name := As.U.Tus (Output_Flows.Stderr_Name);
-        Flow.Set (File_Name.Image, Stderr'Access);
+        Flow.Set (Memory.Eval (File_Name.Image), Stderr'Access);
       exception
         when Output_Flows.Already_Error =>
           -- Stderr is already registered, cannot use the File access provided