Fixed code review remarks by @ninjarobot

CompositionalIT · Oct 28, 2024 · 5fc4705 · 5fc4705
1 parent 84adfe5
commit 5fc4705
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 6 deletions.
diff --git a/src/Farmer/Builders/Builders.Storage.fs b/src/Farmer/Builders/Builders.Storage.fs
@@ -286,9 +286,9 @@ type StorageAccountBuilder() =
                 Containers =
                     let containers =
                         names
-                        |> List.ofSeq
-                        |> List.map (fun name ->
+                        |> Seq.map (fun name ->
                             ((StorageResourceName.Create name).OkValue, access, immutabilityPolicies))
+                        |> Seq.toList
 
                     state.Containers @ containers
         }

diff --git a/src/Farmer/Types.fs b/src/Farmer/Types.fs
@@ -442,19 +442,19 @@ type FeatureFlagExtensions =
 
     [<Extension>]
     static member AsBoolean(featureFlag: FeatureFlag option) =
-        featureFlag |> Option.map (fun f -> f.AsBoolean) |> Option.toNullable
+        featureFlag |> Option.map _.AsBoolean |> Option.toNullable
 
     [<Extension>]
     static member AsInvertedBoolean(featureFlag: FeatureFlag option) =
-        featureFlag |> Option.map (fun f -> f.AsInvertedBoolean) |> Option.toNullable
+        featureFlag |> Option.map _.AsInvertedBoolean |> Option.toNullable
 
     [<Extension>]
     static member ArmValue(featureFlag: FeatureFlag option) =
-        featureFlag |> Option.map (fun f -> f.ArmValue) |> Option.toObj
+        featureFlag |> Option.map _.ArmValue |> Option.toObj
 
     [<Extension>]
     static member ArmInvertedValue(featureFlag: FeatureFlag option) =
-        featureFlag |> Option.map (fun f -> f.ArmInvertedValue) |> Option.toObj
+        featureFlag |> Option.map _.ArmInvertedValue |> Option.toObj
 
 module FeatureFlag =
     let ofBool enabled = if enabled then Enabled else Disabled