{-# LANGUAGE OverloadedStrings #-}
import Yesod.Static ()

import Test.Hspec
import Test.Hspec.HUnit ()
-- import Test.Hspec.QuickCheck (prop)

main :: IO ()
main = return () -- hspecX $ return []
{- FIXME specs

specs :: IO [Spec]
specs = runSpecM $ do
  context "get file list" $ do
    ti "pieces" $ do
      x <- getFileListPieces "tests/data"
      x @?= [["foo"], ["bar", "baz"]]-}