diff options
Diffstat (limited to 'Utility')
| -rw-r--r-- | Utility/SafeCommand.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/SafeCommand.hs b/Utility/SafeCommand.hs index 59e9f5f29..2b9adce48 100644 --- a/Utility/SafeCommand.hs +++ b/Utility/SafeCommand.hs @@ -111,7 +111,7 @@ segmentXargsUnordered l = go l [] 0 [] where go [] c _ r = (c:r) go (f:fs) c accumlen r - | len < maxlen && newlen > maxlen = go (f:fs) [] 0 (c:r) + | newlen > maxlen && len < maxlen = go (f:fs) [] 0 (c:r) | otherwise = go fs (f:c) newlen r where len = length f |