diff options
| author | marty hiatt <martianhiatus@riseup.net> | 2024-08-05 19:36:16 +0200 | 
|---|---|---|
| committer | marty hiatt <martianhiatus@riseup.net> | 2024-08-05 19:36:16 +0200 | 
| commit | ab96a9b145d914541fafbb765b381f4d2bc880d7 (patch) | |
| tree | cb69d433d2902b582969f5ae182525a81958e487 /test/mastodon-http-tests.el | |
| parent | d73dd4c48fc5c32aacdde06126c7c5e399856235 (diff) | |
add concat url params test
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")))) | 
