From 6b76050f758917cf3552c20f99a4bfedd66049f2 Mon Sep 17 00:00:00 2001 From: Alexander Foremny Date: Thu, 5 Oct 2023 10:30:29 +0200 Subject: show single issue by id only --- app/Issue/Filter.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'app/Issue') 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)) -- cgit v1.2.3