emacs acercar / alejar

86

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

emacs sawa
fuente
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)
sawa
fuente
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)
Pedro
fuente
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)
Stacksys
fuente
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