emacs увеличить / уменьшить масштаб

86

Есть ли способ увеличивать и уменьшать масштаб (динамически изменять размер шрифта, довольно плавно) на emacs?

сава
источник
1
Также работает на emacs 24
Мэтт

Ответы:

138

Попробуйте C-x C-+и C-x C--; то есть Control- x Control- Minus/ Control- Plus.

После одной комбинации ( C-x C-+или C-x C--), successives +или -увеличить или уменьшить масштаб текста без ввода C-x C-снова.

Дополнение от sawa

Я просмотрел функцию, которая была назначена упомянутым клавишам, и обнаружил, что это text-scale-increaseи text-scale-decrease. Я добавил следующее в свой файл конфигурации, чтобы я мог использовать Ctrl+ Scrollдля увеличения / уменьшения. Это полезно.

(global-set-key [C-mouse-4] 'text-scale-increase)
(global-set-key [C-mouse-5] 'text-scale-decrease)
sawa
источник
Спасибо, помогло. Я попробую назначить это колесу прокрутки (возможно, с Ctrl) на мышке.
sawa
2
Вы также можете позвонить, (text-scale-set LEVEL)если заранее знаете, чего хотите. Например, я использую это, чтобы уменьшить размер шрифта в буфере по умолчанию:(add-hook 'ibuffer-mode-hook 'my-ibuffer-mode-hook) (defun my-ibuffer-mode-hook () (text-scale-set -1))
phils
Для плавного увеличения и уменьшения я могу использовать функции, о которых мне сообщают nvm. Для разных режимов отображения функция phils может быть хорошей.
sawa
3
Почему-то у меня не работает команда Саввы вверх / вниз, а вот эта:(global-set-key (kbd "C-<wheel-up>") 'text-scale-increase) (global-set-key (kbd "C-<wheel-down>") 'text-scale-decrease)
jule64
Похоже, что это minusдолжно быть от клавиш пишущей машинки, а не от цифровой клавиатуры.
Viesturs
8

-Очень хороший- ответ пользователя 173973 связывает функции с неуниверсальными событиями мыши. То есть, например, в моей системе Windows команда привязки недействительна.

Чтобы использовать его в окнах (или, возможно, где угодно), вы можете использовать эти общие привязки:

(global-set-key [C-mouse-wheel-up-event]  'text-scale-increase)
(global-set-key  [C-mouse-wheel-down-event] 'text-scale-decrease)
Питер
источник
У меня это не работает даже с (setq w32-pass-extra-mouse-buttons-to-system t). Любые идеи? (Я нахожусь в Windows 7.)
Брэди Трейнор
2
Я получил это сейчас из блога Xah Lee, и я добился успеха (kbd "<C-wheel-up>"). Особенно, опишите ключи с C-h k ctrl+scroll-up.
Брэди Трейнор
Для меня (в unix) это не работает. Работает только ответ @sawa.
Bastian 01
1

У меня сработал этот конфиг:

(global-set-key [C-wheel-up] 'text-scale-increase)
(global-set-key [C-wheel-down] 'text-scale-decrease)
Stacksys
источник
Событие [C-wheel-up] также сработало для меня. Однако я нашел [CS-wheel-up] более разумным, поскольку он еще не назначен по умолчанию.
rm -rf