We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 1fefa4b commit b7c8bf4Copy full SHA for b7c8bf4
src/dune_engine/vcs.ml
@@ -142,9 +142,7 @@ let describe =
142
@@ make_fun "vcs-describe"
143
~doc:"Obtain a nice description of the tip from the vcs"
144
~output:(Simple (module Option_output (String)))
145
- ~git:(fun t ->
146
- run_git t [ "describe"; "--always"; "--dirty" ]
147
- |> Fiber.map ~f:(Option.map ~f:String.trim))
+ ~git:(fun t -> run_git t [ "describe"; "--always"; "--dirty" ])
148
~hg:(fun x ->
149
let open Fiber.O in
150
let+ res = hg_describe x in
0 commit comments