summaryrefslogtreecommitdiff
path: root/LocationLog.hs
diff options
context:
space:
mode:
Diffstat (limited to 'LocationLog.hs')
-rw-r--r--LocationLog.hs5
1 files changed, 0 insertions, 5 deletions
diff --git a/LocationLog.hs b/LocationLog.hs
index f778df386..a939af825 100644
--- a/LocationLog.hs
+++ b/LocationLog.hs
@@ -123,11 +123,6 @@ logNow s u = do
now <- getPOSIXTime
return $ LogLine now s u
-{- Returns the filename of the log file for a given key. -}
-logFile :: Git.Repo -> Key -> String
-logFile repo key =
- gitStateDir repo ++ keyFile key ++ ".log"
-
{- Returns a list of repository UUIDs that, according to the log, have
- the value of a key. -}
keyLocations :: Git.Repo -> Key -> IO [UUID]