diff options
author | marty hiatt <martianhiatus@riseup.net> | 2024-08-04 09:50:18 +0200 |
---|---|---|
committer | marty hiatt <martianhiatus@riseup.net> | 2024-08-04 09:50:18 +0200 |
commit | 4ac5b57ae6c4e94439a44820d81df00785d420c4 (patch) | |
tree | 1202433689a7b5f00eb4c110d2ffb7712c8a0892 /lisp/mastodon-media.el | |
parent | a191fb5f3fb118892845792fe34ab41d98ccdf53 (diff) | |
parent | da0e348bc7aaa48474da8cf0ee657fed3f5e485d (diff) |
Merge branch 'develop'
Diffstat (limited to 'lisp/mastodon-media.el')
-rw-r--r-- | lisp/mastodon-media.el | 8 |
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 "\"") |