diff options
author | Joey Hess <joeyh@joeyh.name> | 2015-04-02 00:33:08 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2015-04-02 00:33:08 -0400 |
commit | 2658923e70a392512b06fc13f300d7d1593d9452 (patch) | |
tree | b16abebac9d11390255d12a40eef78a8eb3f32ab /Utility | |
parent | 7989943d6a58d14ef1fa02f46067743468137eb5 (diff) |
minor opt
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 |