getResxFiles :: FilePath -> IO [FilePath]
getResxFiles topdir = do
  files <- getRecursiveContents topdir
  let resxs = filter (isSuffixOf ".resx") files
  return resxs
getResxFiles :: FilePath -> IO [FilePath]
getResxFiles topdir = do
  files <- getRecursiveContents topdir
  let resxs = filter (isSuffixOf ".resx") files
  return resxs
getResxFiles topdir = do
  files <- getRecursiveContents topdir
  let resxs = filter (isSuffixOf ".resx") files
  return resxs