Commits

Yaron Minsky  committed 479b295

|! -> |>

  • Participants
  • Parent commits 1866b2a

Comments (0)

Files changed (1)

File directory.ml

 
 let dump t =
   Hashtbl.to_alist t
-  |! List.map ~f:(fun (topic,tpub) ->
+  |> List.map ~f:(fun (topic,tpub) ->
     let num_subscribers = Topic_pub.num_subscribers tpub in
     let message = Topic_pub.last_message tpub in
     {Dump. topic; num_subscribers; message })