Zooming: Ctrl-=' as an alias for
Ctrl-+'
On many keyboards, `-' and `+' are not symmetrical; while `-' requires only one key to be pressed, `+' requires 2 keys: `Shift' and `='. Consequently, zooming in is `Ctrl--', but zooming out is `Ctrl-Shift-='. This commit includes `Ctrl-=' as an alternative for zooming out.
This commit is contained in:
parent
7d51766219
commit
e5cadbd358
2 changed files with 3 additions and 2 deletions
3
KEYS
3
KEYS
|
@ -47,7 +47,8 @@ Ctrl-p - launch a command with the document path as an argument
|
|||
<,> - rotate
|
||||
[,] - decrease/increase page brightness
|
||||
Ctrl-g - interrupt search
|
||||
Ctrl-+/- - zoom in/out
|
||||
Ctrl-+ or Ctrl-= - zoom in
|
||||
Ctrl-- - zoom out
|
||||
Ctrl-0 - fit page width and reset panning
|
||||
Ctrl-1 - fit page height
|
||||
Ctrl-2 - zoom to ...
|
||||
|
|
2
main.ml
2
main.ml
|
@ -4713,7 +4713,7 @@ let viewkeyboard key mask =
|
|||
enttext (s, "", Some (onhist state.hists.pat),
|
||||
textentry, ondone (key = 47), true)
|
||||
|
||||
| 43 | 0xffab when ctrl -> (* ctrl-+ *)
|
||||
| 43 | 0xffab | 61 when ctrl -> (* ctrl-+ or ctrl-=*)
|
||||
let incr = if conf.zoom +. 0.01 > 0.1 then 0.1 else 0.01 in
|
||||
setzoom (conf.zoom +. incr)
|
||||
|
||||
|
|
Loading…
Reference in a new issue