переменная высота для режима организации, фиксированная высота для таблиц? - PullRequest
Новая
       6

переменная высота для режима организации, фиксированная высота для таблиц?

17 голосов
/ 21 сентября 2010

Я узнал о variable-pitch-mode через ветку здесь, в StackOverflow , и это очень удобно при написании в org-mode, проще для глаз и всего. Но использование таблиц в org практически бесполезно при использовании пропорциональных шрифтов. И возможность использовать таблицы является одной из сильных сторон с org-mode :-(

Есть ли способ иметь пропорциональные шрифты для текста, заголовков и т. Д., Кроме моноширинного шрифта для таблиц в org-mode?

Ответы [ 2 ]

19 голосов
/ 21 сентября 2010

Посмотрите, работает ли это, 

(set-face-attribute 'org-table nil :inherit 'fixed-pitch)

Вы можете использовать C-u C-x = , чтобы увидеть, какое лицо действует в определенной точке.

10 голосов
/ 29 мая 2013

Этот код будет создавать таблицы и блоки ascii art и исходный код для отображения моноширинным шрифтом, сохраняя при этом другие атрибуты шрифта для таблиц (например, синий цвет) и т. Д.Код основан на другом ответе, единственное отличие - сохранение. 

(defun my-adjoin-to-list-or-symbol (element list-or-symbol)
  (let ((list (if (not (listp list-or-symbol))
                  (list list-or-symbol)
                list-or-symbol)))
    (require 'cl-lib)
    (cl-adjoin element list)))

(eval-after-load "org"
  '(mapc
    (lambda (face)
      (set-face-attribute
       face nil
       :inherit
       (my-adjoin-to-list-or-symbol
        'fixed-pitch
        (face-attribute face :inherit))))
    (list 'org-code 'org-block 'org-table 'org-block-background)))

Если вы хотите узнать, как это работает и как применить это в других ситуациях (например, в режиме информации), прочитайте мой пост по теме

...