diff options
Diffstat (limited to 'app/Issue/Filter.hs')
| -rw-r--r-- | app/Issue/Filter.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/app/Issue/Filter.hs b/app/Issue/Filter.hs index 0ce945d..717fa8d 100644 --- a/app/Issue/Filter.hs +++ b/app/Issue/Filter.hs @@ -4,7 +4,7 @@ module Issue.Filter ( Filter, - filterOption, + filterArg, applyFilter, ) where @@ -21,8 +21,8 @@ data Filter | IncludeByTag Text (Maybe Text) deriving (Show) -filterOption :: O.Parser [Filter] -filterOption = +filterArg :: O.Parser [Filter] +filterArg = O.many ( O.option (O.maybeReader (parse . T.pack)) |