use base64 module from extlib for CI compat

Author: yasunariw

lib/dune

@@ -1,7 +1,7 @@
 (library
  (name lib)
- (libraries atdgen atdgen-runtime base base.caml base64 biniou cstruct curl
-   curl.lwt devkit devkit.core hex lwt lwt.unix nocrypto omd re stdio uri
+ (libraries atdgen atdgen-runtime base base.caml biniou cstruct curl curl.lwt
+   devkit devkit.core extlib hex lwt lwt.unix nocrypto omd re stdio uri
    yojson)
  (preprocess
   (pps lwt_ppx)))

lib/github.ml

@@ -75,7 +75,7 @@ let config_of_content_api_response response =
   | "base64" ->
     Lwt.return
     @@ Notabot_j.config_of_string
-    @@ Base64.decode_exn
+    @@ Base64.decode_string
     @@ String.concat
     @@ String.split ~on:'\n'
     @@ response.content

lib/slack.ml

@@ -32,7 +32,8 @@ let mrkdwn_of_markdown_opt = Option.map ~f:mrkdwn_of_markdown
 
 let show_labels = function
   | [] -> None
-  | (labels: label list) -> Some (sprintf "Labels: %s" @@ String.concat ~sep:", " (List.map ~f:(fun x -> x.name) labels))
+  | (labels : label list) ->
+    Some (sprintf "Labels: %s" @@ String.concat ~sep:", " (List.map ~f:(fun x -> x.name) labels))
 
 let generate_pull_request_notification notification =
   let { action; number; sender; pull_request; repository } = notification in

notabot.opam

@@ -25,7 +25,6 @@ depends: [
  "stdio"
  "uri"
  "ocamlformat" {dev & = "0.13.0"}
- "base64"
  "omd" {< "2.0.0"}
  "yojson"
 ]

src/dune

@@ -1,5 +1,5 @@
 (executable
- (libraries lib base base.caml base64 cmdliner devkit devkit.core lwt.unix
+ (libraries lib base base.caml cmdliner devkit devkit.core extlib lwt.unix
    stdio uri)
  (preprocess
   (pps lwt_ppx))

test/dune

@@ -1,6 +1,6 @@
 (executable
  (name test)
- (libraries lib base base.caml base64 devkit devkit.core lwt.unix stdio
+ (libraries lib base base.caml devkit devkit.core extlib lwt.unix stdio
    yojson)
  (preprocess
   (pps lwt_ppx)))