2010-09-21 12 views
17

मुझे variable-pitch-modethrough a thread here on StackOverflow पता चला, और org-mode में लिखते समय यह बहुत आसान है, आंखों और सब कुछ पर आसान है। लेकिन आनुपातिक फोंट का उपयोग करते समय संगठन में टेबल का उपयोग बेकार के करीब है। और तालिकाओं का उपयोग करने में सक्षम होने org-mode:-('चर-पिच' संगठन के लिए, टेबल के लिए निश्चित पिच?

साथ ताकत में से एक है वहाँ पाठ, शीर्षकों आदि लेकिन org-mode में तालिकाओं के लिए एक monospace फ़ॉन्ट के लिए आनुपातिक फोंट के लिए कोई तरीका है?

उत्तर

18

अगर यह काम करता है देखें,

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

आप उपयोग कर सकते हैं सी-यू सी-एक्स = को देखने के लिए जो चेहरा एक खास बिंदु पर प्रभाव में है।

+0

पढ़ यह Emacs 24 :) – julien

+0

बहुत बढ़िया के साथ काम करता है! जैसा कि मैं चाहता हूं बस काम करता है :) – monotux

+2

आप कैसे पता लगाया कि तालिका 'org-table थी? मैं एसक्यूएल बफर – EoghanM

8

यह कोड टेबल और एसीआईआई कला और स्रोत कोड ब्लॉक को मोनोस्पेस फ़ॉन्ट में प्रदर्शित करने के लिए बनाएगा, जबकि तालिकाओं के लिए अन्य फ़ॉन्ट विशेषताओं (जैसे रंगीन नीला) और अन्य को संरक्षित करता है। कोड दूसरे उत्तर पर आधारित है, केवल अंतर संरक्षण है।

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

आप को जानने के लिए यह कैसे काम करता है और कैसे (जैसे जानकारी मोड के रूप में) अन्य स्थितियों को यह लागू करने के लिए चाहते हैं, तो my post on the subject

+0

किसी कारण के लिए, हालांकि चल 'वर्णन-face' मुझसे कहता है कि फॉन्ट से इनहेरिट किया जाना चाहिए 'तय पिच (या बस' मेरे मामले में डिफ़ॉल्ट), दिखाया गया फॉन्ट अभी भी 'चर पिच ... –

+0

कभी मन लगता है बग के कारण 'बफर-लोकल-थीम' पैकेज बनें। –

संबंधित मुद्दे