Oops - I should have reviewed the original pr better ... sorry (#9881)

* Fix Package Scripting nuget package * Compose * Phillip suggested options should compose too
dotnet · Aug 6, 2020 · 2b38aa7 · 2b38aa7
1 parent a265343
commit 2b38aa7
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 =