diff --git a/src/mte.ml b/src/mte.ml
index 73136df7..fc7b7e48 100644
--- a/src/mte.ml
+++ b/src/mte.ml
@@ -34,9 +34,9 @@ let reporter : Logs.reporter =
     let pp = styled (`Fg color) Logs.pp_header in
     pf ppf "%a" pp v
   in
-  let pp_src_name ppf v =
-    let pp = using Logs.Src.name (styled `Cyan string) in
-    if not @@ Logs.Src.equal Logs.default v then pp ppf v
+  let pp_src_name =
+    let pp = using Logs.Src.name (styled `Cyan (fmt "%s: ")) in
+    fun ppf v -> if not @@ Logs.Src.equal Logs.default v then pp ppf v
   in
   let pp_detail = option (styled `Green (fmt " (%s)")) in
   let report src lvl ~over k msgf =