diff options
author | Joey Hess <joey@kitenet.net> | 2014-10-09 15:09:26 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2014-10-09 15:09:26 -0400 |
commit | adb4603fbf69d8638d925627e0c85b473a3fef05 (patch) | |
tree | 789d7d7a1075d6d947143f391eca86a58f1f46ea /Logs.hs | |
parent | a26b7127d4cc8b2a5e15ef662ab2793dbf9e7919 (diff) |
indent with tabs not spaces
Found these with:
git grep "^ " $(find -type f -name \*.hs) |grep -v ': where'
Unfortunately there is some inline hamlet that cannot use tabs for
indentation.
Also, Assistant/WebApp/Bootstrap3.hs is a copy of a module and so I'm
leaving it as-is.
Diffstat (limited to 'Logs.hs')
-rw-r--r-- | Logs.hs | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -90,11 +90,11 @@ locationLogFile key = hashDirLower key ++ keyFile key ++ ".log" locationLogFileKey :: FilePath -> Maybe Key locationLogFileKey path | ["remote", "web"] `isPrefixOf` splitDirectories dir = Nothing - | ext == ".log" = fileKey base - | otherwise = Nothing + | ext == ".log" = fileKey base + | otherwise = Nothing where (dir, file) = splitFileName path - (base, ext) = splitAt (length file - 4) file + (base, ext) = splitAt (length file - 4) file {- The filename of the url log for a given key. -} urlLogFile :: Key -> FilePath |