aboutsummaryrefslogtreecommitdiff
path: root/Logs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2017-03-10 15:57:41 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2017-03-10 15:57:41 -0400
commitb55c32d4c6cb63ffd6d9ce49eee8be95628c9746 (patch)
treef4d15499f39cb35e4e13e0ff587b55877935bb0c /Logs
parent2878880f7b7de4ef78abf6c39434153a1a3647bc (diff)
Drop support for building with old versions of directory, feed, and http-types.
Diffstat (limited to 'Logs')
-rw-r--r--Logs/Unused.hs7
1 files changed, 0 insertions, 7 deletions
diff --git a/Logs/Unused.hs b/Logs/Unused.hs
index 2361fedbc..a2f40410b 100644
--- a/Logs/Unused.hs
+++ b/Logs/Unused.hs
@@ -15,8 +15,6 @@
- Licensed under the GNU GPL version 3 or higher.
-}
-{-# LANGUAGE CPP #-}
-
module Logs.Unused (
UnusedMap,
updateUnusedLog,
@@ -93,14 +91,9 @@ readUnusedMap :: FilePath -> Annex UnusedMap
readUnusedMap = log2map <$$> readUnusedLog
dateUnusedLog :: FilePath -> Annex (Maybe UTCTime)
-#if MIN_VERSION_directory(1,2,0)
dateUnusedLog prefix = do
f <- fromRepo $ gitAnnexUnusedLog prefix
liftIO $ catchMaybeIO $ getModificationTime f
-#else
--- old ghc's getModificationTime returned a ClockTime
-dateUnusedLog _prefix = return Nothing
-#endif
{- Set of unused keys. This is cached for speed. -}
unusedKeys :: Annex (S.Set Key)