1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00

* lisp/image-mode.el (image-mode-map): Update menu items.

* lisp/image-mode.el (image-mode-map): Move "Fit Image to Window (Best Fit)"
higher.  Add "Zoom In" (image-increase-size), "Zoom Out" (image-decrease-size)
and "Rotate Clockwise" (image-rotate).  Use name "Set Rotation..."
for image-transform-set-rotation.  Swap "Next Image" and "Previous Image".
Swap "Next Frame" and "Previous Frame".
This commit is contained in:
Juri Linkov 2020-04-27 01:33:36 +03:00
parent f0e1bf56f0
commit 1f76a16ed3

View File

@ -505,16 +505,22 @@ call."
"--"
["Fit Frame to Image" image-mode-fit-frame :active t
:help "Resize frame to match image"]
["Fit Image to Window (Best Fit)" image-transform-fit-both
:help "Resize image to match the window height and width"]
["Fit to Window Height" image-transform-fit-to-height
:help "Resize image to match the window height"]
["Fit to Window Width" image-transform-fit-to-width
:help "Resize image to match the window width"]
["Fit to Window Height and Width" image-transform-fit-both
:help "Resize image to match the window height and width"]
["Zoom In" image-increase-size
:help "Enlarge the image"]
["Zoom Out" image-decrease-size
:help "Shrink the image"]
["Set Scale..." image-transform-set-scale
:help "Resize image by specified scale factor"]
["Rotate Image..." image-transform-set-rotation
["Rotate Clockwise" image-rotate
:help "Rotate the image"]
["Set Rotation..." image-transform-set-rotation
:help "Set rotation angle of the image"]
["Reset Transformations" image-transform-reset
:help "Reset all image transformations"]
"--"
@ -524,10 +530,10 @@ call."
(image-dired default-directory))
:active default-directory
:help "Show thumbnails for all images in this directory"]
["Next Image" image-next-file :active buffer-file-name
:help "Move to next image in this directory"]
["Previous Image" image-previous-file :active buffer-file-name
:help "Move to previous image in this directory"]
["Next Image" image-next-file :active buffer-file-name
:help "Move to next image in this directory"]
["Copy File Name" image-mode-copy-file-name-as-kill
:active buffer-file-name
:help "Copy the current file name to the kill ring"]
@ -565,10 +571,10 @@ call."
["Reset Animation Speed" image-reset-speed
:active image-multi-frame
:help "Reset the speed of this image's animation"]
["Next Frame" image-next-frame :active image-multi-frame
:help "Show the next frame of this image"]
["Previous Frame" image-previous-frame :active image-multi-frame
:help "Show the previous frame of this image"]
["Next Frame" image-next-frame :active image-multi-frame
:help "Show the next frame of this image"]
["Goto Frame..." image-goto-frame :active image-multi-frame
:help "Show a specific frame of this image"]
))