dhall(fix): fix for generated configuration for Kong 1.x upgrade

diff --git a/dhall/server/service/plugin/Config.dhall b/dhall/server/service/plugin/Config.dhall
index 73a333f56a120aff6ddfa81f7040286f8d0edf27..d54436b065fe3edebd1875a4903f28f66d978c2d 100644 (file)
--- a/dhall/server/service/plugin/Config.dhall
+++ b/dhall/server/service/plugin/Config.dhall
@@ -1,9 +1,9 @@
 < CorrelationId :
-    { header_name : Text, echo_downstream : Bool }
+       { header_name : Text, echo_downstream : Bool }
 | RequestTransformer :
-    { `add.headers` : Text }
+       { add : { headers : List Text } }
 | RequestTermination :
-    { status_code : Natural, content_type : Text, body : Text }
+       { status_code : Natural, content_type : Text, body : Text }
 | IPRestriction :
-    { whitelist : Text }
->
+       { whitelist : Text }
+>
\ No newline at end of file

diff --git a/dhall/server/service/plugin/mkRequestTransformer.dhall b/dhall/server/service/plugin/mkRequestTransformer.dhall
index 90789c85aba54b16c640e2e2d5acd108a8a8da6f..1d8d608914a1fc74695c21abd0400bd9cdb28bf2 100644 (file)
--- a/dhall/server/service/plugin/mkRequestTransformer.dhall
+++ b/dhall/server/service/plugin/mkRequestTransformer.dhall
@@ -1,11 +1,11 @@
-    let Plugin = ./Plugin.dhall
+let Plugin = ./Plugin.dhall
 
 in  let config = constructors ./Config.dhall
 
-in    λ(header : Text)
-    →   { name =
-            "request-transformer"
-        , config =
-            config.RequestTransformer { `add.headers` = header }
-        }
-      : Plugin
+       in    λ(header : Text)
+               →   { name =
+                               "request-transformer"
+                       , config =
+                               config.RequestTransformer { add = { headers = [ header ] } }
+                       }
+                 : Plugin
\ No newline at end of file