diff options
author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2011-05-22 20:19:55 +0200 |
---|---|---|
committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2011-05-22 20:19:55 +0200 |
commit | 7766a52277f22491c0da390c4e8ef38b99a17fe2 (patch) | |
tree | 6906cecef92dbc495e450f4f0c03703946ef927d | |
parent | 250c4bbfd1a220ddab8e5ee46f4329c5be000b5f (diff) | |
download | hakyll-7766a52277f22491c0da390c4e8ef38b99a17fe2.tar.gz |
Writable instance for ()
-rw-r--r-- | src/Hakyll/Core/Writable.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Hakyll/Core/Writable.hs b/src/Hakyll/Core/Writable.hs index 280258d..b7a4116 100644 --- a/src/Hakyll/Core/Writable.hs +++ b/src/Hakyll/Core/Writable.hs @@ -20,6 +20,9 @@ class Writable a where -- | Save an item to the given filepath write :: FilePath -> a -> IO () +instance Writable () where + write _ _ = return () + instance Writable [Char] where write = writeFile |