strip setup info from failed steps logs

thatportugueseguy · thatportugueseguy · commit b27cdfaab046 · 2025-03-06T11:45:03.000Z
diff --git a/lib/slack.ml b/lib/slack.ml
@@ -414,7 +414,6 @@ let generate_status_notification ~(job_log : (string * string) list) ~(cfg : Con
   in
   let text = Some (String.concat "\n" @@ List.concat [ commit_info; branches_info ]) in
   let attachment = { empty_attachments with mrkdwn_in = Some [ "fields"; "text" ]; color = Some color_info; text } in
-  let reply_of_log log = log |> Text_cleanup.cleanup |> String.split_on_char '\r' |> String.concat "\n" in
   let handler =
     match job_log with
     | [] ->
@@ -425,7 +424,10 @@ let generate_status_notification ~(job_log : (string * string) list) ~(cfg : Con
       let files =
         job_log
         |> List.map (fun (job_name, job_log) ->
-               { name = job_name; title = None; alt_txt = None; content = reply_of_log job_log })
+               let clean = job_log |> Text_cleanup.cleanup |> String.split_on_char '\r' |> String.concat "\n" in
+               (* Buildkite has different "sections" on their builds logs. The commands we run come only after this line. *)
+               let content = Stre.after clean "~~~ Running commands\n\n" in
+               { name = job_name; title = None; alt_txt = None; content })
       in
       Some
         (fun (send_file : file:file_req -> (unit, string) result Lwt.t) (res : Slack_t.post_message_res) ->
