diff options
Diffstat (limited to 'lib/models/id/channel_id.ml')
| -rw-r--r-- | lib/models/id/channel_id.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/models/id/channel_id.ml b/lib/models/id/channel_id.ml index 1017ad1..a147e86 100644 --- a/lib/models/id/channel_id.ml +++ b/lib/models/id/channel_id.ml @@ -1,4 +1,3 @@ -open Core
include Channel_id_t
exception Invalid_message
@@ -51,5 +50,5 @@ let get_pins ch = Http.get_pinned_messages (get_id ch)
let bulk_delete msgs ch =
- let msgs = `List (List.map ~f:(fun id -> `Int id) msgs) in
+ let msgs = `List (List.map (fun id -> `Int id) msgs) in
Http.bulk_delete (get_id ch) msgs
\ No newline at end of file |