在文本模式下在Emacs中设置4个空格缩进

Question

TAB在使用主模式按下缓冲区时,我没有成功让Emacs从8个空格标签切换到4个空格标签text-mode.我已将以下内容添加到我的.emacs:

(setq-default indent-tabs-mode nil)
(setq-default tab-width 4)

;;; And I have tried
(setq indent-tabs-mode nil)
(setq tab-width 4)

无论我如何更改我的.emacs文件(或我的缓冲区的局部变量),TAB按钮总是做同样的事情.

1. 如果上面没有文字,则缩进8个空格
2. 如果前一行有文本,则缩进到第二个单词的开头

尽管我喜欢Emacs但这很烦人.当上一行中没有文本时,有没有办法让Emacs至少缩进4个空格？

Answer 1

简短回答:

关键点是告诉emacs在缩进时插入你想要的东西,这是通过改变缩进线功能来完成的.更改它以插入选项卡然后将选项卡更改为4个空格比将其更改为插入4个空格更容易.以下配置将解决您的问题:

(setq-default indent-tabs-mode nil)
(setq-default tab-width 4)
(setq indent-line-function 'insert-tab)

说明:

来自主流模式控制的缩进@ emacs手册:

每种主要模式的一个重要功能是为正在编辑的语言自定义缩进键.

[...]

indent-line-function变量是(以及各种命令,例如调用indent-region时)用来缩进当前行的函数.命令indent-based-to-mode只不过是调用这个函数.

[...]

对于许多模式,默认值是缩进相对的.

来自缩进相关的@ emacs手册:

缩进相对空格到前一个非空行中的下一个缩进点下方.

[...]

如果前一个非空行没有超出列点开始的缩进点,则执行"tab-to-tab-stop".

只需将indent-line-function的值更改为insert-tab函数,并将Tab键插入配置为4个空格.

Answer 2

我总是痛苦地看到一些事情,比如tab-stop-list当nil功能坐在那里等待使用时.

(setq tab-stop-list (number-sequence 4 200 4))

要么

(defun my-generate-tab-stops (&optional width max)
  "Return a sequence suitable for `tab-stop-list'."
  (let* ((max-column (or max 200))
         (tab-width (or width tab-width))
         (count (/ max-column tab-width)))
    (number-sequence tab-width (* tab-width count) tab-width)))

(setq tab-width 4)
(setq tab-stop-list (my-generate-tab-stops))

Answer 3

(customize-variable (quote tab-stop-list))

或者在.emacs文件中添加tab-stop-list条目到custom-set-variables:

(custom-set-variables
  ;; custom-set-variables was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 '(tab-stop-list (quote (4 8 12 16 20 24 28 32 36 40 44 48 52 56 60 64 68 72 76 80 84 88 92 96 100 104 108 112 116 120))))

Answer 4

您可能会发现更容易设置选项卡,如下所示:

M-x customize-group

在Customize group:提示输入indent.

您将看到一个屏幕,您可以在其中设置所有缩进选项并为当前会话设置它们,或者为将来的所有会话保存它们.

如果您这样做,您将需要设置自定义文件.

Answer 5

(setq tab-width 4)
(setq tab-stop-list '(4 8 12 16 20 24 28 32 36 40 44 48 52 56 60 64 68 72 76 80))
(setq indent-tabs-mode nil)

Answer 6

(defun my-custom-settings-fn ()
  (setq indent-tabs-mode t)
  (setq tab-stop-list (number-sequence 2 200 2))
  (setq tab-width 2)
  (setq indent-line-function 'insert-tab))

(add-hook 'text-mode-hook 'my-custom-settings-fn)

Answer 7

(setq-default indent-tabs-mode nil)
(setq-default tab-width 4)
(setq indent-line-function 'insert-tab)
(setq c-default-style "linux") 
(setq c-basic-offset 4) 
(c-set-offset 'comment-intro 0)

这适用于C++代码和内部注释

Answer 8

此问题不是由缺少制表位引起的; 是的,emacs有一个名为indent-relative的(new？)制表符方法,似乎是为了排列表格数据.TAB键映射到方法indent-for-tab-command,它调用变量indent-line-function设置的任何方法,这是文本模式的缩进相对方法.我没有想出一个覆盖缩进行函数变量的好方法(文本模式挂钩不工作,所以也许它在模式挂钩运行后重置？)但是一个简单的方法来摆脱这个行为是通过将TAB设置为更简单的tab-to-tab-stop方法来查看intent-for-tab-command方法:

(define-key text-mode-map(kbd"TAB")'tab-to-tab-stop)

Answer 9

试试这个:

(add-hook 'text-mode-hook
  (function
   (lambda ()
     (setq tab-width 4)
     (define-key text-mode-map "\C-i" 'self-insert-command)
     )))

这将使TAB始终插入一个文字TAB字符,每4个字符使用制表位(但仅限于文本模式).如果这不是您所要求的,请描述您希望看到的行为.

Answer 10

您可以将这些代码行添加到.emacs文件中.它为文本模式添加了一个钩子,以使用insert-tab而不是indent-relative.

(custom-set-variables
 '(indent-line-function 'insert-tab)
 '(indent-tabs-mode t)
 '(tab-width 4))
(add-hook 'text-mode-hook
      (lambda() (setq indent-line-function 'insert-tab)))

我希望它有所帮助.