emacs acercar / alejar


86

¿Hay alguna forma de acercar y alejar (cambiar dinámicamente el tamaño de fuente, sin problemas) en emacs?


1
También funciona en emacs 24
Matt

Respuestas:


138

Prueba C-x C-+y C-x C--; es decir, Control- x Control- Minus/ Control- Plus.

Después de una combinación ( C-x C-+o C-x C--), las sucesivas +o -aumentan o disminuyen la escala del texto sin C-x C-volver a escribir .

Adición de sawa

Busqué la función que se asignó a las teclas mencionadas y descubrí que son text-scale-increasey text-scale-decrease. Agregué lo siguiente a mi archivo de configuración para poder hacer Ctrl+ Scrollpara acercar / alejar. Es útil.

(global-set-key [C-mouse-4] 'text-scale-increase)
(global-set-key [C-mouse-5] 'text-scale-decrease)

Gracias, ayudó. Intentaré asignar eso a la rueda de desplazamiento (tal vez con Ctrl) en el mouse.
sawa

2
También puedes llamar (text-scale-set LEVEL)si sabes de antemano lo que quieres. Por ejemplo, utilizo esto para reducir el tamaño de fuente en ibuffer por defecto:(add-hook 'ibuffer-mode-hook 'my-ibuffer-mode-hook) (defun my-ibuffer-mode-hook () (text-scale-set -1))
phils

Para acercar y alejar sin problemas, puedo usar las funciones que nvm me avisa. Para tener diferentes modos de visualización, los phils funcionan bien.
sawa

3
De alguna manera, el comando de rueda arriba / abajo de Sawa no funciona para mí, pero este sí:(global-set-key (kbd "C-<wheel-up>") 'text-scale-increase) (global-set-key (kbd "C-<wheel-down>") 'text-scale-decrease)
jule64

Parece que minusdebe ser de las teclas de la máquina de escribir, no del teclado numérico.
Viesturs

8

La respuesta -muy agradable- de user173973 es vincular las funciones a eventos de mouse no genéricos. Es decir que, por ejemplo, en mi sistema Windows, el comando de enlace no es válido.

Para usarlo en Windows (o probablemente en cualquier lugar) puede usar estos enlaces genéricos:

(global-set-key [C-mouse-wheel-up-event]  'text-scale-increase)
(global-set-key  [C-mouse-wheel-down-event] 'text-scale-decrease)

Esto no funciona para mí, incluso con (setq w32-pass-extra-mouse-buttons-to-system t). ¿Algunas ideas? (Estoy en Windows 7.)
Brady Trainor

2
Lo tengo ahora, del blog de Xah Lee, tengo éxito con (kbd "<C-wheel-up>"). Especialmente, describe la clave con C-h k ctrl+scroll-up.
Brady Trainor

Para mí (en Unix) esto no funciona. Solo la respuesta de @sawa funciona.
Bastian

1

Esta configuración funcionó para mí:

(global-set-key [C-wheel-up] 'text-scale-increase)
(global-set-key [C-wheel-down] 'text-scale-decrease)

El evento [C-wheel-up] también funcionó para mí. Sin embargo, encontré [CS-wheel-up] más prudente ya que aún no está asignado de forma predeterminada.
rm -rf
Al usar nuestro sitio, usted reconoce que ha leído y comprende nuestra Política de Cookies y Política de Privacidad.
Licensed under cc by-sa 3.0 with attribution required.