From a4151f009c9513cb67883ec33adf74bccdeaa906 Mon Sep 17 00:00:00 2001
From: Robin Munn <rmunn@pobox.com>
Date: Thu, 25 Jun 2020 13:38:07 +0700
Subject: [PATCH] Add seq-based overload for Docopt.Parse

---
 src/app/Fake.Core.CommandLineParsing/docopt.fs/Docopt/Docopt.fs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/app/Fake.Core.CommandLineParsing/docopt.fs/Docopt/Docopt.fs b/src/app/Fake.Core.CommandLineParsing/docopt.fs/Docopt/Docopt.fs
index ee65aad45c1..0b07c3473de 100644
--- a/src/app/Fake.Core.CommandLineParsing/docopt.fs/Docopt/Docopt.fs
+++ b/src/app/Fake.Core.CommandLineParsing/docopt.fs/Docopt/Docopt.fs
@@ -105,6 +105,7 @@ type Docopt(doc', ?soptChars':string) =
           |> addKey opt.DefaultValue opt.FullLong
           |> addKey opt.DefaultValue opt.FullShort
         ) map) result
+    member this.Parse(argv':#seq<string>) = this.Parse(argv' |> Seq.toArray)
 
     member __.Usage = String.Join("\n", uStrs)
     member __.UsageParser = pusage