yesod-static-0.3.1: tests/runtests.hs
{-# 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"]]-}