13 lines
244 B
Haskell
13 lines
244 B
Haskell
|
module URLs (
|
||
|
|
test
|
||
|
|
) where
|
||
|
|
|
||
|
|
import Blog.URL (URL(..))
|
||
|
|
import Distribution.TestSuite
|
||
|
|
import Utils (simpleTest, tag)
|
||
|
|
|
||
|
|
test :: Test
|
||
|
|
test = tag "URLs" . testGroup "URLs handling" $ simpleTest <$> [
|
||
|
|
("nothing", return $ Finished Pass)
|
||
|
|
]
|