Merge pull request #526 from pbriand/notifications

Ocsigen Start Notif Android

Author: Jan Rochel

src/os_fcm_notif.eliom

@@ -137,6 +137,9 @@ module Data =
 
         let add_soundname str t = add_raw_string "soundname" str t
 
+        let add_notification_channel_id id t =
+          ("android_channel_id", `String id) :: t
+        
         let add_notification_id id t =
           ("notId", `Int id) :: t
 

src/os_fcm_notif.eliomi

@@ -177,6 +177,8 @@ module Data :
     (** The type representing a data payload. *)
     type t
 
+    val to_json : t -> Yojson.Safe.json
+
     (** [to_list data] returns the representation of the data as a list of
         tuples [(data_key, json_value)]. *)
     val to_list : t -> (string * Yojson.Safe.json) list
@@ -222,9 +224,11 @@ module Data :
             notification area instead of one. If a new notification has the same
             ID as an older one, the new one will replace it. It is useful for
             chats for example.
-         *)
+        *)
         val add_notification_id : int -> t -> t
 
+        val add_notification_channel_id : string -> t -> t
+        
         module Style :
           sig
             type t = Inbox | Picture