main :: IO ()
main = do
  [src] <- getArgs
  [a] <- runX  ( xunpickleDocument xpAnimeList [ withRemoveWS yes ] src)
  let file = "anime.json"
  writeFile file "var data ="
  B.appendFile file $ encodePretty' myConfig a
  appendFile file ";"
  return ()
main :: IO ()
main = do
  [src] <- getArgs
  [a] <- runX  ( xunpickleDocument xpAnimeList [ withRemoveWS yes ] src)
  let file = "anime.json"
  writeFile file "var data ="
  B.appendFile file $ encodePretty' myConfig a
  appendFile file ";"
  return ()
main = do
  [src] <- getArgs
  [a] <- runX  ( xunpickleDocument xpAnimeList [ withRemoveWS yes ] src)
  let file = "anime.json"
  writeFile file "var data ="
  B.appendFile file $ encodePretty' myConfig a
  appendFile file ";"
  return ()