From b3133a2d747ed537af8982ea417ce46ada525027 Mon Sep 17 00:00:00 2001
From: Jon Schoning <jonschoning@gmail.com>
Date: Mon, 13 Nov 2017 06:44:46 -0600
Subject: [PATCH] [haskell-http-client] fix bug when generating models-only
 (#6931)

---
 .../codegen/languages/HaskellHttpClientCodegen.java | 13 +++++++++++--
 1 file changed, 11 insertions(+), 2 deletions(-)

diff --git a/modules/swagger-codegen/src/main/java/io/swagger/codegen/languages/HaskellHttpClientCodegen.java b/modules/swagger-codegen/src/main/java/io/swagger/codegen/languages/HaskellHttpClientCodegen.java
index 55e963548121..f7a4da788715 100644
--- a/modules/swagger-codegen/src/main/java/io/swagger/codegen/languages/HaskellHttpClientCodegen.java
+++ b/modules/swagger-codegen/src/main/java/io/swagger/codegen/languages/HaskellHttpClientCodegen.java
@@ -580,6 +580,17 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
             ops.get(0).vendorExtensions.put(X_HAS_NEW_TAG, true);
         }
 
+        updateGlobalAdditionalProps();
+        return ret;
+    }
+
+    @Override
+    public Map<String, Object> postProcessAllModels(Map<String, Object> objs) {
+        updateGlobalAdditionalProps();
+        return super.postProcessAllModels(objs);
+    }
+
+    public void updateGlobalAdditionalProps() {
         additionalProperties.put(X_HAS_UNKNOWN_MIME_TYPES, !unknownMimeTypes.isEmpty());
 
         Collections.sort(unknownMimeTypes, new Comparator<Map<String, String>>() {
@@ -601,8 +612,6 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
             }
         });
         additionalProperties.put(X_ALL_UNIQUE_PARAMS, params);
-
-        return ret;
     }
 
     @Override