make MatchFiles introspectable
matchNeedsFileContent is not used yet, but shows how to add information about terminals. That one would be needed for https://git-annex.branchable.com/todo/sync_fast_import/ Note the tricky bit in Annex.FileMatcher.call where it folds over the included matcher to propagate the information. This commit was sponsored by Svenne Krap on Patreon.
This commit is contained in:
parent
6d95361f35
commit
c1b4d76e6b
7 changed files with 146 additions and 66 deletions
|
@ -91,7 +91,8 @@ seek o = do
|
|||
, liftIO exitFailure
|
||||
)
|
||||
where
|
||||
checkmatcher matcher = matchMrun matcher $ \a -> a S.empty (matchinfo o)
|
||||
checkmatcher matcher = matchMrun matcher $ \op ->
|
||||
matchAction op S.empty (matchinfo o)
|
||||
|
||||
bail :: String -> IO a
|
||||
bail s = do
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue