`Variable poix pour org-mode, à pas fixe pour les tables?

Question

J'ai découvert variable-pitch-mode à travers un fil ici sur StackOverflow , et il est très pratique lors de l'écriture dans org-mode, plus facile sur les yeux et tout. Mais l'utilisation de tables org est proche de rien lors de l'utilisation des polices proportionnelles. Et être capable d'utiliser des tables est un des points forts avec org-mode :-(

Est-il possible d'avoir des polices proportionnelles pour le texte, les titres, etc., mais une police pour les tables à espacement fixe org-mode?

Answer 1

Voir si cela fonctionne,

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

Vous pouvez utiliser C-C-u x = pour voir quelle face est en effet en un point particulier.

Answer 2

Ce code va faire des tableaux et l'art ascii et blocs code source à afficher en caractères à espacement fixe, tout en conservant les autres attributs de police pour les tables (comme le bleu de couleur) et ainsi de suite. Code est basé sur l'autre réponse, la seule différence est la préservation.

(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)))

Si vous souhaitez savoir comment cela fonctionne et comment l'appliquer à d'autres situations (telles que le mode Info), lu mon post sur le sujet