From a4da8b372fc0ec844ec6544abd7adca1a42e140c Mon Sep 17 00:00:00 2001 From: Miguel de la Cruz Date: Sun, 22 May 2022 20:11:46 +0200 Subject: [PATCH] Sugar syntax --- mattermost.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mattermost.el b/mattermost.el index a55cfd4..7e8ea22 100644 --- a/mattermost.el +++ b/mattermost.el @@ -72,7 +72,7 @@ if the user is not present" "Log into the Mattermost Server" (let ((url-request-method "POST") (url-request-extra-headers '(("Content-Type" . "application/json"))) - (url-request-data (json-serialize (list :login_id username :password password)))) + (url-request-data (json-serialize `(:login_id ,username :password ,password)))) (with-current-buffer (url-retrieve-synchronously (concat mattermost-server-url "/api/v4/users/login")) (beginning-of-buffer) (search-forward "Token: ")