From 9bfcb93e869c84ebb190099a6de03d051c301afb Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Tue, 7 Nov 2017 14:18:10 -0400
Subject: remove dead code

---
 Logs/UUID.hs | 10 ----------
 1 file changed, 10 deletions(-)

diff --git a/Logs/UUID.hs b/Logs/UUID.hs
index 1160dfcda..8da727228 100644
--- a/Logs/UUID.hs
+++ b/Logs/UUID.hs
@@ -16,7 +16,6 @@
 module Logs.UUID (
 	uuidLog,
 	describeUUID,
-	recordUUID,
 	uuidMap,
 	uuidMapLoad
 ) where
@@ -68,15 +67,6 @@ fixBadUUID = M.fromList . map fixup . M.toList
 	minimumPOSIXTimeSlice = 0.000001
 	isuuid s = length s == 36 && length (splitc '-' s) == 5
 
-{- Records the uuid in the log, if it's not already there. -}
-recordUUID :: UUID -> Annex ()
-recordUUID u = go . M.lookup u =<< uuidMap 
-  where
-	go (Just "") = set
-	go Nothing = set
-	go _ = noop
-	set = describeUUID u ""
-
 {- The map is cached for speed. -}
 uuidMap :: Annex UUIDMap
 uuidMap = maybe uuidMapLoad return =<< Annex.getState Annex.uuidmap
-- 
cgit v1.2.3