diff options
Diffstat (limited to 'haskell/src/SpaceTraders/APIClient/Contracts.hs')
| -rw-r--r-- | haskell/src/SpaceTraders/APIClient/Contracts.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/haskell/src/SpaceTraders/APIClient/Contracts.hs b/haskell/src/SpaceTraders/APIClient/Contracts.hs index 9c5bf02..81546a9 100644 --- a/haskell/src/SpaceTraders/APIClient/Contracts.hs +++ b/haskell/src/SpaceTraders/APIClient/Contracts.hs @@ -24,5 +24,5 @@ myContracts = do Right (APIMessage r (Just p')) -> do mapM_ setContract r if limit p' * page p' < total p' then listContracts' (nextPage p') - else Right <$> getContracts + else Right <$> getContracts _ -> undefined |