aboutsummaryrefslogtreecommitdiff
path: root/Git/Command.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-03-18 22:09:51 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-03-18 22:09:51 -0400
commit77c2d3b36ace1bb159598404d3173d7714e6629f (patch)
treeebb9707cf4eae8b8a7213c05217cdab2097c2ced /Git/Command.hs
parent9acd2ee80f357d34eee7335f775b47bec87f4aed (diff)
assistant: The ConfigMonitor left one zombie behind each time it checked for changes, now fixed.
Diffstat (limited to 'Git/Command.hs')
-rw-r--r--Git/Command.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/Git/Command.hs b/Git/Command.hs
index f3841c7fa..e6cec16fb 100644
--- a/Git/Command.hs
+++ b/Git/Command.hs
@@ -94,6 +94,12 @@ pipeNullSplit params repo = do
where
sep = "\0"
+pipeNullSplitStrict :: [CommandParam] -> Repo -> IO [String]
+pipeNullSplitStrict params repo = do
+ s <- pipeReadStrict params repo
+ return $ filter (not . null) $ split sep s
+ where
+ sep = "\0"
pipeNullSplitZombie :: [CommandParam] -> Repo -> IO [String]
pipeNullSplitZombie params repo = leaveZombie <$> pipeNullSplit params repo