Fixes brendanhay#447: Special-case 'V2' suffix for operation names

This allows "ListObjectsV2" to be rendered correctly.
rcook · Feb 26, 2018 · c5a3bc8 · c5a3bc8
1 parent ed9f400
commit c5a3bc8
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/gen/src/Gen/Text.hs b/gen/src/Gen/Text.hs
@@ -56,6 +56,7 @@ stripSuffix s t = Text.strip . fromMaybe t $ s `Text.stripSuffix` t
 renameOperation :: Text -> Text
 renameOperation t
     | "S3" `Text.isSuffixOf` t = t
+    | "V2" `Text.isSuffixOf` t = t -- Allow "ListObjectsV2"
     | otherwise                = Text.dropWhileEnd f (Text.strip t)
   where
     f x = x == '_'