diff options
author | Vasily Postnicov <shamaz.mazum@gmail.com> | 2024-04-17 14:18:17 +0300 |
---|---|---|
committer | Andre A. Gomes <andremegafone@gmail.com> | 2024-04-17 14:20:11 +0300 |
commit | 1f583161ce9034c1329d4a2e6941f78ce8c791c7 (patch) | |
tree | 21737a97d486858f0afc14fa3d354d00f2767056 /tests | |
parent | 424eff657fadc62ae3de936b494ce371c69d5167 (diff) |
tests/offline/urls: Add tests.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/offline/urls.lisp | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/tests/offline/urls.lisp b/tests/offline/urls.lisp index 55b43d447..3d5d1b945 100644 --- a/tests/offline/urls.lisp +++ b/tests/offline/urls.lisp @@ -55,7 +55,15 @@ ;; "valid syntax but unknown scheme" (assert-equality #'quri:uri= (quri:uri "https://search.atlas.engineer/searxng/search?q=foo:blank") - (url (first (nyxt::input->queries "foo:blank"))))) + (url (first (nyxt::input->queries "foo:blank")))) + ;; "'Partial' URLs without scheme but with path" + (assert-equality #'quri:uri= + (quri:uri "https://github.com/atlas-engineer") + (url (first (nyxt::input->queries "github.com/atlas-engineer")))) + ;; IP address without scheme + (assert-equality #'quri:uri= + (quri:uri "https://127.0.0.1") + (url (first (nyxt::input->queries "127.0.0.1"))))) (define-test nyxt-urls () (assert-error 'simple-error |