matches :: Refs -> M.Map FilePath Filter
matches = M.fromListWith (++) . concatMap fromPair . M.toList
matches :: Refs -> M.Map FilePath Filter
matches = M.fromListWith (++) . concatMap fromPair . M.toList
matches = M.fromListWith (++) . concatMap fromPair . M.toList