diff --git a/src/app/Fake.Tools.Git/Information.fs b/src/app/Fake.Tools.Git/Information.fs
index 3afba73d3eb..34f4b45ed56 100644
--- a/src/app/Fake.Tools.Git/Information.fs
+++ b/src/app/Fake.Tools.Git/Information.fs
@@ -80,7 +80,14 @@ module Information =
             match Environment.environVarOrNone "BUILD_SOURCEVERSION" with
             | None -> reraise ()
             | Some s -> s
-
+    /// <summary>
+    /// Returns the short SHA1 of the current <c>HEAD</c>
+    /// </summary>
+    ///
+    /// <param name="repositoryDir">The git repository.</param>
+    let getCurrentShortSHA1 repositoryDir =
+        let _, msg, _ = CommandHelper.runGitCommand repositoryDir "rev-parse --short HEAD"
+        msg |> String.separated ""
     /// <summary>
     /// Returns the short SHA1 of the current <c>HEAD</c>
     /// </summary>