Oops - I should have reviewed the original pr better ... sorry (dotne…

…t#9881) * Fix Package Scripting nuget package * Compose * Phillip suggested options should compose too
abelbraaksma · Aug 9, 2020 · b05e400 · b05e400
1 parent 0a90c7e
commit b05e400
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tests/FSharp.Test.Utilities/Compiler.fs b/tests/FSharp.Test.Utilities/Compiler.fs
@@ -173,12 +173,12 @@ module rec Compiler =
 
     let withOptions (options: string list) (cUnit: CompilationUnit) : CompilationUnit =
         match cUnit with
-        | FS fs -> FS { fs with Options = options }
+        | FS fs -> FS { fs with Options = fs.Options @ options }
         | _ -> failwith "withOptions is only supported n F#"
 
     let withPreview (cUnit: CompilationUnit) : CompilationUnit =
         match cUnit with
-        | FS fs -> FS { fs with Options = [ "--langversion:preview" ] }
+        | FS fs -> FS { fs with Options = fs.Options @ [ "--langversion:preview" ] }
         | _ -> failwith "withPreview is only supported in F#"
 
     let asLibrary (cUnit: CompilationUnit) : CompilationUnit =