diff options
Diffstat (limited to 'src/utils.hs')
| -rw-r--r-- | src/utils.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/utils.hs b/src/utils.hs index 4ffdf3b..252804f 100644 --- a/src/utils.hs +++ b/src/utils.hs @@ -49,5 +49,5 @@ safeBreak cond ex = safeBreak' cond ex [] safeBreak' _ ex _ [] = throwError ex safeBreak' cond ex acc lst@(x : xs) - | cond x = pure (acc, lst) + | cond x = pure (reverse acc, lst) | otherwise = safeBreak' cond ex (x : acc) xs |