@@ -439,8 +439,8 @@ serviceName = Text.unpack . (<> "Service") . toCamel . _sCanonicalName
440scopeName :: Service a -> Text -> String
440scopeName :: Service a -> Text -> String
441scopeName s k =
441scopeName s k =
442− let y = _sCanonicalName s <> "AllScope"
442+ let y = _sCanonicalName s <> "AllScope"
443− in Text.unpack . toCamel $
443+ in Text.unpack . toCamel $
444 case Text.split (== '/') k of
444 case Text.split (== '/') k of
446 xs -> case last xs of
446 xs -> case last xs of