dropOuterClass :: Text -> Text
dropOuterClass s
  | T.isInfixOf "::" s = T.dropWhile (==':') $ T.dropWhile (/=':') s
  | otherwise = s
dropOuterClass :: Text -> Text
dropOuterClass s
  | T.isInfixOf "::" s = T.dropWhile (==':') $ T.dropWhile (/=':') s
  | otherwise = s
dropOuterClass s
  | T.isInfixOf "::" s = T.dropWhile (==':') $ T.dropWhile (/=':') s
  | otherwise = s