fixed npick by removing the line that cancels a list on only pending …

…promises
ocsigen · Jul 14, 2017 · fc724f6 · fc724f6
1 parent 0a5bdde
commit fc724f6
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/src/core/lwt.ml b/src/core/lwt.ml
@@ -2534,7 +2534,6 @@ struct
         let callback in_completion_loop _result =
           let State_may_now_be_pending_proxy p = may_now_be_proxy p in
           let p = underlying p in
-          List.iter cancel ps;
           let State_may_have_changed p =
             finish_nchoose_or_npick_after_pending in_completion_loop p [] ps in
           ignore p