diff options
Diffstat (limited to 'Logs/Trust/Basic.hs')
-rw-r--r-- | Logs/Trust/Basic.hs | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/Logs/Trust/Basic.hs b/Logs/Trust/Basic.hs index 646e2e037..c356be28f 100644 --- a/Logs/Trust/Basic.hs +++ b/Logs/Trust/Basic.hs @@ -8,6 +8,7 @@ module Logs.Trust.Basic ( module X, trustSet, + trustMapRaw, ) where import Data.Time.Clock.POSIX @@ -30,3 +31,8 @@ trustSet uuid@(UUID _) level = do parseLog (Just . parseTrustLog) Annex.changeState $ \s -> s { Annex.trustmap = Nothing } trustSet NoUUID _ = error "unknown UUID; cannot modify" + +{- Does not include forcetrust or git config values, just those from the + - log file. -} +trustMapRaw :: Annex TrustMap +trustMapRaw = calcTrustMap <$> Annex.Branch.get trustLog |