From dd5448eb075c3774aa173cb9f2e4344ce62b3e13 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Tue, 15 Mar 2011 23:58:27 -0400
Subject: added 2 level hashing

This means there can be 1024 subdirs, each with up to 1024 sub-subdirs.
So with hundreds of millions of annexed objects, each leaf directory will
have only a few files on average.
---
 LocationLog.hs | 5 -----
 1 file changed, 5 deletions(-)

(limited to 'LocationLog.hs')

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]
-- 
cgit v1.2.3