Add ToString method to MergeStyle (#96)

Smaug123 · Sep 22, 2024 · 0c394a0 · 0c394a0
1 parent 9f0e2c0
commit 0c394a0
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/Gitea.Declarative.Lib/ConfigSchema.fs b/Gitea.Declarative.Lib/ConfigSchema.fs
@@ -18,13 +18,15 @@ type MergeStyle =
         elif s = "rebase-merge" then MergeStyle.RebaseMerge
         else failwithf "Unrecognised merge style '%s'" s
 
-    static member toString (s : MergeStyle) : string =
-        match s with
+    override this.ToString () : string =
+        match this with
         | Merge -> "merge"
         | RebaseMerge -> "rebase-merge"
         | Rebase -> "rebase"
         | Squash -> "squash"
 
+    static member toString (m : MergeStyle) = m.ToString ()
+
 type PushMirror =
     {
         GitHubAddress : Uri