remove unused contentFile = Nothing
This commit is contained in:
parent
25e4ab7e81
commit
ee4fd38ecf
11 changed files with 32 additions and 40 deletions
|
@ -131,7 +131,7 @@ batchFilesMatching fmt a = do
|
|||
matcher <- getMatcher
|
||||
go $ \si f ->
|
||||
let f' = toRawFilePath f
|
||||
in ifM (matcher $ MatchingFile $ FileInfo (Just f') f' Nothing)
|
||||
in ifM (matcher $ MatchingFile $ FileInfo f' f' Nothing)
|
||||
( a (si, f')
|
||||
, return Nothing
|
||||
)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue