factor out new module
This commit is contained in:
parent
2a65f07621
commit
1435c4f149
4 changed files with 88 additions and 52 deletions
|
@ -35,10 +35,6 @@ data ViewComponent = ViewComponent
|
|||
instance Arbitrary ViewComponent where
|
||||
arbitrary = ViewComponent <$> arbitrary <*> arbitrary <*> arbitrary
|
||||
|
||||
{- Only files with metadata matching the view are displayed. -}
|
||||
type FileView = FilePath
|
||||
type MkFileView = FilePath -> FileView
|
||||
|
||||
data ViewFilter
|
||||
= FilterValues (S.Set MetaValue)
|
||||
| FilterGlob String
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue