aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authormousebot <mousebot@riseup.net>2021-10-29 11:18:57 +0200
committermousebot <mousebot@riseup.net>2021-10-29 11:18:57 +0200
commit4c7c6f4f3cb832cecc67da23e4567e11a236adf7 (patch)
treef543053d8e1f3a44da7f602a47a6203714c58258
parent39acda46f8597aaf45e664e97c8a39a9a4b2225e (diff)
fix for image uploads error in 'emacs -Q': expand file name!
-rw-r--r--lisp/mastodon-toot.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el
index 70b95d3..309b64a 100644
--- a/lisp/mastodon-toot.el
+++ b/lisp/mastodon-toot.el
@@ -565,7 +565,8 @@ will be uploaded and attached to the toot upon sending."
It adds the items' ids to `mastodon-toot--media-attachment-ids', which is used to actually attach them to a toot after uploading."
(interactive)
(mapcar (lambda (attachment)
- (let* ((filename (cdr (assoc :filename attachment)))
+ (let* ((filename (expand-file-name
+ (cdr (assoc :filename attachment))))
(caption (cdr (assoc :description attachment)))
(url (concat mastodon-instance-url "/api/v2/media")))
(message "Uploading %s..." (file-name-nondirectory filename))