aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Kangas2022-09-24 01:45:54 +0200
committerStefan Kangas2022-09-24 11:26:06 +0200
commit7bac1d0b60bbc942a65a16635b49bab8ce52ffa9 (patch)
treedab4063f176d59762ba14ac08cfe34eb9bb63131
parentb74ee91122ed65411949f992022d2af72b551f90 (diff)
downloademacs-7bac1d0b60bbc942a65a16635b49bab8ce52ffa9.tar.gz
emacs-7bac1d0b60bbc942a65a16635b49bab8ce52ffa9.zip
image-dired: Use command substitution for tags bindings
* lisp/image/image-dired-tags.el (image-dired-dired-edit-comment-and-tags): Use substitute-command-keys
-rw-r--r--lisp/image/image-dired-tags.el13
1 files changed, 8 insertions, 5 deletions
diff --git a/lisp/image/image-dired-tags.el b/lisp/image/image-dired-tags.el
index 7a837875ce4..dfd64732859 100644
--- a/lisp/image/image-dired-tags.el
+++ b/lisp/image/image-dired-tags.el
@@ -293,11 +293,14 @@ easy-to-use form."
293 (remove-overlays) 293 (remove-overlays)
294 ;; Some help for the user. 294 ;; Some help for the user.
295 (widget-insert 295 (widget-insert
296 "\nEdit comments and tags for each image. Separate multiple tags 296 (substitute-command-keys
297with a comma. Move forward between fields using TAB or RET. 297 "\\<widget-field-keymap>
298Move to the previous field using backtab (S-TAB). Save by 298Edit comments and tags for each image. Separate multiple tags
299activating the Save button at the bottom of the form or cancel 299with a comma. Move forward between fields using \\[widget-forward] \
300the operation by activating the Cancel button.\n\n") 300or \\[widget-field-activate].
301Move to the previous field using \\[widget-backward]. Save by
302activating the \"Save\" button at the bottom of the form or
303cancel the operation by activating the \"Cancel\" button.\n\n"))
301 ;; Here comes all images and a comment and tag field for each 304 ;; Here comes all images and a comment and tag field for each
302 ;; image. 305 ;; image.
303 (let (thumb-file img comment-widget tag-widget) 306 (let (thumb-file img comment-widget tag-widget)