summaryrefslogtreecommitdiff
path: root/src/Hakyll
diff options
context:
space:
mode:
authorPiyush P Kurur <ppk@cse.iitk.ac.in>2013-03-07 17:56:56 +0530
committerPiyush P Kurur <ppk@cse.iitk.ac.in>2013-03-07 17:56:56 +0530
commit7fc2f677d9e4b4267059275d4e6451410893fc04 (patch)
treeeb2b1babdcf329a9da3d8bb99d77e5ed2b7d64e8 /src/Hakyll
parent1c50baff7a752d6dedd3cf9ec5efc819f08f1d3c (diff)
downloadhakyll-7fc2f677d9e4b4267059275d4e6451410893fc04.tar.gz
fixing the coding style
Diffstat (limited to 'src/Hakyll')
-rw-r--r--src/Hakyll/Core/Configuration.hs24
1 files changed, 12 insertions, 12 deletions
diff --git a/src/Hakyll/Core/Configuration.hs b/src/Hakyll/Core/Configuration.hs
index be9a460..8cbbff0 100644
--- a/src/Hakyll/Core/Configuration.hs
+++ b/src/Hakyll/Core/Configuration.hs
@@ -8,7 +8,7 @@ module Hakyll.Core.Configuration
--------------------------------------------------------------------------------
-import Data.Default
+import Data.Default (Default(..))
import Data.List (isPrefixOf, isSuffixOf)
import System.FilePath (normalise, takeFileName)
@@ -57,8 +57,9 @@ data Configuration = Configuration
inMemoryCache :: Bool
}
+--------------------------------------------------------------------------------
instance Default Configuration where
- def = Configuration
+ def = Configuration
{ destinationDirectory = "_site"
, storeDirectory = "_cache"
, tmpDirectory = "_cache/tmp"
@@ -67,18 +68,17 @@ instance Default Configuration where
, deployCommand = "echo 'No deploy command specified'"
, inMemoryCache = True
}
- where
- ignoreFile' path
- | "." `isPrefixOf` fileName = True
- | "#" `isPrefixOf` fileName = True
- | "~" `isSuffixOf` fileName = True
- | ".swp" `isSuffixOf` fileName = True
- | otherwise = False
- where
- fileName = takeFileName path
+ where
+ ignoreFile' path
+ | "." `isPrefixOf` fileName = True
+ | "#" `isPrefixOf` fileName = True
+ | "~" `isSuffixOf` fileName = True
+ | ".swp" `isSuffixOf` fileName = True
+ | otherwise = False
+ where
+ fileName = takeFileName path
--------------------------------------------------------------------------------
-
-- | Default configuration for a hakyll application
defaultConfiguration :: Configuration
defaultConfiguration = Configuration