diff options
Diffstat (limited to 'Command/Status.hs')
-rw-r--r-- | Command/Status.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Command/Status.hs b/Command/Status.hs index 6a50c1ab5..75080706d 100644 --- a/Command/Status.hs +++ b/Command/Status.hs @@ -35,6 +35,7 @@ import Config import Utility.Percentage import Logs.Transfer import Types.TrustLevel +import Types.FileMatcher import qualified Limit -- a named computation that produces a statistic @@ -286,7 +287,7 @@ getLocalStatInfo dir = do where initial = (emptyKeyData, emptyKeyData) update matcher key file vs@(presentdata, referenceddata) = - ifM (matcher $ Annex.FileInfo file file) + ifM (matcher $ FileInfo file file) ( (,) <$> ifM (inAnnex key) ( return $ addKey key presentdata |