From 1a700906962807f379929743fc180a65c86c368a Mon Sep 17 00:00:00 2001
From: Corentin Leruth <corentin.leruth@gmail.com>
Date: Mon, 1 Apr 2024 09:50:50 +0200
Subject: [PATCH] fix buildkite url parsing

---
 lib/slack.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/slack.ml b/lib/slack.ml
index 5015e1ed..9104e3df 100644
--- a/lib/slack.ml
+++ b/lib/slack.ml
@@ -291,8 +291,8 @@ let generate_status_notification (cfg : Config_t.config) (notification : status_
         (* Keep only the portion of the url before /builds/... *)
         let pipeline_url =
           match String.split_on_char '/' target_url with
-          | "https:" :: "" :: "buildkite.com" :: "org" :: pipeline :: "builds" :: _ ->
-            Some (Printf.sprintf "https://buildkite.com/org/%s" pipeline)
+          | "https:" :: "" :: "buildkite.com" :: org :: pipeline :: "builds" :: _ ->
+            Some (Printf.sprintf "https://buildkite.com/%s/%s" org pipeline)
           | _ -> None
         in
         match pipeline_url with