diff options
Diffstat (limited to 'Command/Info.hs')
| -rw-r--r-- | Command/Info.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/Command/Info.hs b/Command/Info.hs index ede61a369..05d6a01d3 100644 --- a/Command/Info.hs +++ b/Command/Info.hs @@ -22,6 +22,7 @@ import qualified Types.Remote as Remote import Utility.DataUnits import Utility.DiskFree import Annex.Content +import Annex.UUID import Logs.UUID import Logs.Trust import Logs.Location @@ -111,6 +112,9 @@ start o ps = do globalInfo :: InfoOptions -> Annex () globalInfo o = do + u <- getUUID + whenM ((==) DeadTrusted <$> lookupTrust u) $ + earlyWarning "Warning: This repository is currently marked as dead." stats <- selStats global_fast_stats global_slow_stats showCustom "info" $ do evalStateT (mapM_ showStat stats) (emptyStatInfo o) |