In SlurpDirectory.lhs:134: wait_a_moment = do { sleep 1; return () } And then it's called in Apply.apply_cmd and Pull.pull_cmd. Can anyone explain what's going on? Juliusz