Emacs में फ़ाइल एक्सटेंशन हुक

Question

मैं विशिष्ट फ़ाइल एक्सटेंशन (यानी मोड नहीं) के लिए एक हुक चलाने के लिए चाहता हूं। मैं elisp साथ शून्य अनुभव है, इसलिए मैं माल-पंथ इस कोडित:

(defun set_tab_mode() 
    (when (looking-at-p "\\.cat") 
    (insert "OK") 
    (orgtbl-mode))) 

(add-hook 'find-file-hook 'set_tab_mode) 

(orgtbl प्रत्यय .cat साथ फ़ाइलों के लिए नाबालिग मोड सेट और पाठ सम्मिलित "ठीक है", यह यानी चाहिए न केवल एक मोड सेट प्रश्न) । दुर्भाग्य से यह काम नहीं करता है।

Answer 1

इस प्रयास करें:

(defun my-set-tab-mode() 
    (when (and (stringp buffer-file-name) 
      (string-match "\\.cat\\'" buffer-file-name)) 
    (insert "OK") 
    (orgtbl-mode))) 

(add-hook 'find-file-hook 'my-set-tab-mode) 

Answer 2

आप auto-mode-alist में लैम्ब्डा उपयोग कर सकते हैं:

(add-to-list 'auto-mode-alist 
      '("\\.cat\\'" . (lambda() 
           ;; add major mode setting here, if needed, for example: 
           ;; (text-mode) 
           (insert "OK") 
           (turn-on-orgtbl))))