match case between FROM and AS

Firobe · MisterDA · commit ede8e64cab66 · 2025-04-03T19:14:02.000+02:00
diff --git a/src/dockerfile.ml b/src/dockerfile.ml
@@ -378,7 +378,7 @@ let rec string_of_line ~escape (t : line) =
              | Some p -> "--platform=" ^ p ^ " ");
              image;
              (match tag with None -> "" | Some t -> ":" ^ t);
-             (match alias with None -> "" | Some a -> " as " ^ a);
+             (match alias with None -> "" | Some a -> " AS " ^ a);
            ])
   | `Maintainer m -> cmd "MAINTAINER" m
   | `Run (mounts, network, security, c) ->
