From 8bb2e27dca0a81da54e0ae2a44a8844d5861e8e0 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Sun, 8 Sep 2013 15:19:14 -0400
Subject: ignore gcrypt remotes w/o an annex-uuid

---
 Config.hs | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'Config.hs')

diff --git a/Config.hs b/Config.hs
index c37481ead..1e4d6caec 100644
--- a/Config.hs
+++ b/Config.hs
@@ -25,6 +25,9 @@ instance Show ConfigKey where
 getConfig :: ConfigKey -> String -> Annex String
 getConfig (ConfigKey key) def = fromRepo $ Git.Config.get key def
 
+getConfigMaybe :: ConfigKey -> Annex (Maybe String)
+getConfigMaybe (ConfigKey key) = fromRepo $ Git.Config.getMaybe key
+
 {- Changes a git config setting in both internal state and .git/config -}
 setConfig :: ConfigKey -> String -> Annex ()
 setConfig (ConfigKey key) value = do
-- 
cgit v1.2.3