@@ -435,7 +435,7 @@ instance HasDescription (Service a) a where
435 description = sDescription
435 description = sDescription
437serviceName :: Service a -> String
437serviceName :: Service a -> String
438−serviceName = Text.unpack . toCamel . _sCanonicalName
438+serviceName = Text.unpack . (<> "Service") . toCamel . _sCanonicalName
440scopeName :: Service a -> Text -> String
440scopeName :: Service a -> Text -> String
441scopeName s k =
441scopeName s k =