diff options
| author | marty hiatt <martianhiatus@riseup.net> | 2024-09-20 20:37:35 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus@riseup.net> | 2024-09-20 20:37:35 +0200 |
| commit | 6803d680c6415e4cc6dca66e597776dae0394170 (patch) | |
| tree | 7795f10a3b5337d4b2169d6eab3adec654fc7cc0 /test/mastodon-http-tests.el | |
| parent | 3443b49c55f65ae8e0b07e93e1e0299ce1bf8ed6 (diff) | |
| parent | 657bd3664749f66d9da0a8a5336b51c592670ecf (diff) | |
Merge branch 'develop'
Diffstat (limited to 'test/mastodon-http-tests.el')
| -rw-r--r-- | test/mastodon-http-tests.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/test/mastodon-http-tests.el b/test/mastodon-http-tests.el index 96f9304..9e0b413 100644 --- a/test/mastodon-http-tests.el +++ b/test/mastodon-http-tests.el @@ -98,3 +98,10 @@ Strict-Transport-Security: max-age=31536000 (should (equal (mastodon-http--build-array-params-alist param-str array) '(("poll[x][]" . "option") ("poll[x][]" . "option2")))))) + +(ert-deftest mastodon-http-concat-params-url () + "" + (let ((url "https://example.com") + (params '(("q" . "query")))) + (should (equal (mastodon-http--concat-params-to-url url params) + "https://example.com?q=query")))) |