diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-05-16 10:01:31 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-05-16 10:01:45 +0200 |
| commit | e40a7844b48e7262b51df573605e542cd621687e (patch) | |
| tree | 76119dab805305320f2dd554e37a2aa907277958 /lisp/mastodon-profile.el | |
| parent | a203ad2fe6a759f3ac340198b4a168fd0d636a16 (diff) | |
don't quote keywords
Diffstat (limited to 'lisp/mastodon-profile.el')
| -rw-r--r-- | lisp/mastodon-profile.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el index 9aed0da..fe1e1dc 100644 --- a/lisp/mastodon-profile.el +++ b/lisp/mastodon-profile.el @@ -214,7 +214,7 @@ NO-REBLOGS means do not display boosts in statuses." "Fetch current VAL ue from account." (let* ((url (mastodon-http--api "accounts/verify_credentials")) (response (mastodon-http--get-json url))) - (if (eq (alist-get val response) ':json-false) + (if (eq (alist-get val response) :json-false) nil (alist-get val response)))) @@ -225,7 +225,7 @@ NO-REBLOGS means do not display boosts in statuses." (defun mastodon-profile--get-source-value (pref) "Return account PREF erence from the \"source\" section on the server." (let ((source (mastodon-profile--get-source-values))) - (if (eq (alist-get pref source) ':json-false) + (if (eq (alist-get pref source) :json-false) nil (alist-get pref source)))) |