Writable instance for ()
commit7766a52277f22491c0da390c4e8ef38b99a17fe2
authorJasper Van der Jeugt <jaspervdj@gmail.com>
dateSun 22 May 2011, 20:19 (15 years ago)
parent250c4bb
src/Hakyll/Core/Writable.hs+3
@@ -20,6 +20,9 @@ class Writable a where
2020 -- | Save an item to the given filepath
2121 write :: FilePath -> a -> IO ()
2222
23+instance Writable () where
24+ write _ _ = return ()
25+
2326instance Writable [Char] where
2427 write = writeFile
2528