From 83cfe439a4e66f0ccb79d46db35948275329db28 Mon Sep 17 00:00:00 2001 From: marty hiatt Date: Sat, 17 Aug 2024 10:28:06 +0200 Subject: process-image-response (change args order) --- lisp/mastodon-media.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/mastodon-media.el') diff --git a/lisp/mastodon-media.el b/lisp/mastodon-media.el index d386462..ce2f8f5 100644 --- a/lisp/mastodon-media.el +++ b/lisp/mastodon-media.el @@ -273,7 +273,7 @@ IBCAQICX9F8/bNVInwJ8BAAAAABJRU5ErkJggg==") "The PNG data for a sensitive image placeholder.") (defun mastodon-media--process-image-response - (status-plist marker image-options region-length url) + (status-plist url marker image-options region-length) "Callback function processing the url retrieve response for URL. STATUS-PLIST is the usual plist of status events as per `url-retrieve'. IMAGE-OPTIONS are the precomputed options to apply to the image. @@ -390,7 +390,7 @@ REGION-LENGTH is the range from start to propertize." (mastodon-media--image-or-cached url #'mastodon-media--process-image-response - (list nil marker image-options region-length url)) + (list nil url marker image-options region-length)) (error (with-current-buffer buffer ;; TODO: Add retries (put-text-property marker (+ marker region-length) -- cgit v1.2.3