summaryrefslogtreecommitdiff
path: root/UUID.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-06-22 17:08:51 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-06-22 17:08:51 -0400
commit4c4ebf2d7570030a70fdbd313b8b60e9fa727eee (patch)
tree06c632c16399245182f38f3d42b5c46d1d7a71c7 /UUID.hs
parent235e2e63a13c629dcca1aa1638f5f47a8d3983ba (diff)
store trust.log and remote.log in the git-annex branch
.. and I think that's everything that will use the branch
Diffstat (limited to 'UUID.hs')
-rw-r--r--UUID.hs8
1 files changed, 6 insertions, 2 deletions
diff --git a/UUID.hs b/UUID.hs
index 78667f235..5d8304f83 100644
--- a/UUID.hs
+++ b/UUID.hs
@@ -19,7 +19,8 @@ module UUID (
genUUID,
prettyPrintUUIDs,
describeUUID,
- uuidMap
+ uuidMap,
+ uuidLog
) where
import Control.Monad.State
@@ -35,11 +36,14 @@ import Types.UUID
import qualified Annex
import qualified SysConfig
import Config
-import Locations
configkey :: String
configkey = "annex.uuid"
+{- Filename of uuid.log. -}
+uuidLog :: FilePath
+uuidLog = "uuid.log"
+
{- Generates a UUID. There is a library for this, but it's not packaged,
- so use the command line tool. -}
genUUID :: IO UUID