Merge branch 'master' of gitlab.cip.ifi.lmu.de:jost/UniWorX
This commit is contained in:
commit
0c9533ccd1
@ -13,8 +13,6 @@ import Data.Bifunctor
|
|||||||
import Text.Parsec
|
import Text.Parsec
|
||||||
import Text.Parsec.Text
|
import Text.Parsec.Text
|
||||||
|
|
||||||
import Data.List (foldl')
|
|
||||||
|
|
||||||
|
|
||||||
parseStudyFeatures :: UserId -> Text -> Either Text [StudyFeatures]
|
parseStudyFeatures :: UserId -> Text -> Either Text [StudyFeatures]
|
||||||
parseStudyFeatures uId = first tshow . parse (pStudyFeatures uId <* eof) ""
|
parseStudyFeatures uId = first tshow . parse (pStudyFeatures uId <* eof) ""
|
||||||
|
|||||||
Reference in New Issue
Block a user