Add test case for capturing leading "./".

2024-09-11 09:05:28 +03:00 · 2024-04-25 10:07:15 -07:00 · 2024-04-25 10:07:15 -07:00 · 6a32e56136
commit 6a32e56136
parent 6df31fa436
1 changed files with 20 additions and 0 deletions
--- a/examples/end-to-end/src/Test/Glob.elm
+++ b/examples/end-to-end/src/Test/Glob.elm
@ -74,6 +74,26 @@ all =
              }
            ]
        }
+    , globTestCase
+        { name = "capture leading ./"
+        , glob =
+            Glob.succeed
+                (\first second wildcardPart ->
+                    { first = first
+                    , second = second
+                    , wildcard = wildcardPart
+                    }
+                )
+                |> Glob.capture (Glob.literal "./glob-test-cases/")
+                |> Glob.capture (Glob.literal "content1/")
+                |> Glob.capture Glob.wildcard
+        , expected =
+            [ { first = "./glob-test-cases/"
+              , second = "content1/"
+              , wildcard = "about.md"
+              }
+            ]
+        }
    , globTestCase
        { name = "capture"
        , glob =