feat(ArgumentParser): Expose ProgramName

fsprojects · Feb 18, 2024 · 6cc6393 · 6cc6393
1 parent dc7dcd3
commit 6cc6393
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/Argu/ArgumentParser.fs b/src/Argu/ArgumentParser.fs
@@ -115,6 +115,9 @@ and [<Sealed; NoEquality; NoComparison; AutoSerializable(false)>]
             | _ -> argInfoWithCheck.Value
         new ArgumentParser<'Template>(argInfo, programName, helpTextMessage, usageStringCharacterWidth, errorHandler)
 
+    /// <summary>The Program Name, as used when rendering help messages. Can be overridden via the <c>programName</c> constructor argument.</summary>
+    member val ProgramName = _programName
+
     /// <summary>Force a check of the discriminated union structure.</summary>
     static member CheckStructure() =
         argInfoWithCheck.Value |> ignore
@@ -284,4 +287,4 @@ module ArgumentParserUtils =
 
     /// gets the F# union tag representation of given argument instance
     let tagOf (input : 'Template) : int =
-        ArgumentParser.Create<'Template>().GetTag input
+        ArgumentParser.Create<'Template>().GetTag input