EMACS和TAB鍵（縮進vs \\ t插入）

Question

假設我有一個<weird language>文件，我正在編輯它。

如果光標位於句子的開頭（假設一個if ，已經縮進了2個級別），並且我按了TAB ，那么我希望EMACS可以增加該行的縮進級別+1（使用TAB或N SPACEs ，具體取決於文件中使用的縮進樣式）。

無論如何，如果我按下TAB並且光標位於if之后， if我希望EMACS插入一個普通\\t 。

如何使EMACS表現得像這樣？

問候

Answer 1

將當前縮進作為開始。 該條件可能需要修改。 另請參閱第三條款。

(defun my-indent-or-insert-tab ()
  "Insert a TAB or indent depending on context. "
  (interactive "*")
  (cond((eq (current-column) (current-indentation)) 
        (indent-for-tab-command))
       ((member (char-after) (list ?\t ? ?\n))
        (insert "\t"))
       (t (message "%s" "Don't know what to do if inside word"))))