aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-media.el
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus@riseup.net>2024-08-04 09:50:18 +0200
committermarty hiatt <martianhiatus@riseup.net>2024-08-04 09:50:18 +0200
commit4ac5b57ae6c4e94439a44820d81df00785d420c4 (patch)
tree1202433689a7b5f00eb4c110d2ffb7712c8a0892 /lisp/mastodon-media.el
parenta191fb5f3fb118892845792fe34ab41d98ccdf53 (diff)
parentda0e348bc7aaa48474da8cf0ee657fed3f5e485d (diff)
Merge branch 'develop'
Diffstat (limited to 'lisp/mastodon-media.el')
-rw-r--r--lisp/mastodon-media.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/mastodon-media.el b/lisp/mastodon-media.el
index d14d283..9dc8517 100644
--- a/lisp/mastodon-media.el
+++ b/lisp/mastodon-media.el
@@ -497,8 +497,12 @@ TYPE is the attachment's type field on the server.
CAPTION is the image caption if provided.
SENSITIVE is a flag from the item's JSON data."
(let* ((help-echo-base
- "RET/i: load full image (prefix: copy URL), +/-: zoom,\
- r: rotate, o: save preview")
+ (substitute-command-keys
+ (concat "\\`RET'/\\`i': load full image (prefix: copy URL), \\`+'/\\`-': zoom,\
+ \\`r': rotate, \\`o': save preview"
+ (if (not (eq sensitive :json-false))
+ ", \\`S': toggle sensitive media"
+ ""))))
(help-echo (if caption
(concat help-echo-base
"\n\"" caption "\"")