Fix codegen not making var patterns lowercase

mdgriffith · May 11, 2024 · 9e39456 · 9e39456
1 parent 8c9a005
commit 9e39456
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/src/Internal/Arg.elm b/src/Internal/Arg.elm
@@ -372,15 +372,18 @@ var name =
     Arg
         (\index ->
             let
+                sanitizedName =
+                    Format.formatValue name
+
                 ( value, annotation, _ ) =
-                    val index name
+                    val index sanitizedName
 
                 imports =
                     []
             in
             { details =
                 { imports = imports
-                , pattern = Compiler.nodify (Pattern.VarPattern name)
+                , pattern = Compiler.nodify (Pattern.VarPattern sanitizedName)
                 , annotation = annotation
                 }
             , index = Index.next index