Đặt 4 thụt lề không gian trong Emacs ở Chế độ văn bản

Tôi đã không thành công khi bắt Emacs chuyển từ 8 tab không gian sang 4 tab không gian khi nhấn TABbộ đệm với chế độ chính text-mode. Tôi đã thêm những điều sau vào .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)

Bất kể tôi thay đổi .emacstệp của mình như thế nào (hoặc các biến cục bộ của bộ đệm), TABnút luôn luôn làm điều tương tự.

1. Nếu không có văn bản ở trên, thụt lề 8 khoảng trắng
2. Nếu có văn bản trên dòng trước, thụt vào đầu từ thứ hai

Tôi yêu Emacs rất nhiều, điều này thật khó chịu. Có cách nào để làm cho Emacs ít nhất thụt vào 4 khoảng trống khi không có văn bản trong dòng trước không?

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

hoặc thêm mục nhập danh sách tab vào biến tùy chỉnh-set-biến trong tệp .emacs :

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

Câu trả lời ngắn:

Điểm mấu chốt là yêu cầu emacs chèn bất cứ thứ gì bạn muốn khi thụt lề, điều này được thực hiện bằng cách thay đổi hàm thụt dòng. Dễ dàng thay đổi nó để chèn một tab và sau đó thay đổi các tab thành 4 khoảng trắng hơn là thay đổi nó để chèn 4 khoảng trắng. Cấu hình sau sẽ giải quyết vấn đề của bạn:

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

Giải trình:

Từ thụt lề Điều khiển bởi hướng dẫn chính của Chế độ chính @ emacs :

Một chức năng quan trọng của mỗi chế độ chính là tùy chỉnh phím để thụt lề đúng cách cho ngôn ngữ được chỉnh sửa.

[...]

Biến hàm thụt dòng là hàm được sử dụng bởi (và các lệnh khác nhau, như khi gọi vùng thụt lề) để thụt dòng hiện tại. Lệnh thụt lề theo chế độ không nhiều hơn gọi hàm này.

[...]

Giá trị mặc định là tương đối thụt cho nhiều chế độ.

Từ hướng dẫn sử dụng thụt lề @ emacs:

Không gian tương đối thụt ra ngoài dưới điểm thụt lề tiếp theo trong dòng không trống trước đó.

[...]

Nếu dòng không trống trước đó không có điểm thụt lề ngoài điểm cột bắt đầu tại, thay vào đó, 'tab-to-tab-stop' được thực hiện.

Chỉ cần thay đổi giá trị của hàm thụt dòng thành hàm chèn thẻ và định cấu hình chèn tab thành 4 khoảng trắng.

Cập nhật: Kể từ Emacs 24.4:

tab-stop-listbây giờ được ngầm mở rộng đến vô cùng. Giá trị mặc định của nó được thay đổi thành nilcó nghĩa là một tab dừng mọi tab-widthcột.

điều đó có nghĩa là không còn cần phải thiết lập tab-stop-listtheo cách hiển thị bên dưới, như bạn có thể giữ cho nó được đặt thành nil.

Câu trả lời gốc theo sau ...

Nó luôn làm tôi hơi đau khi nhìn thấy những thứ như (setq tab-stop-list 4 8 12 ................)khi number-sequencechức năng đang ngồi đó chờ được sử dụng.

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

hoặc là

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

Bạn có thể thấy dễ dàng hơn để thiết lập các tab của mình như sau:

M-x customize-group

Tại Customize group:dấu nhắc nhập indent.

Bạn sẽ thấy một màn hình nơi bạn có thể đặt tất cả các tùy chọn thụt lề và đặt chúng cho phiên hiện tại hoặc lưu chúng cho tất cả các phiên trong tương lai.

Nếu bạn làm theo cách này, bạn sẽ muốn thiết lập một tệp tùy chỉnh .

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

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

(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ái này hoạt động với mã C ++ và bình luận bên trong

Vấn đề này không phải do các tab bị thiếu; đó là emacs có một phương thức tab (mới?) được gọi là thụt lề có vẻ như được thiết kế để sắp xếp dữ liệu dạng bảng. Khóa TAB được ánh xạ tới lệnh indent-for-tab-lệnh, gọi bất kỳ phương thức nào mà hàm thụt dòng biến được đặt thành, là phương thức thụt lề cho chế độ văn bản. Tôi chưa tìm ra một cách hay để ghi đè biến chức năng dòng thụt lề (hook chế độ văn bản không hoạt động, vì vậy có thể nó được đặt lại sau khi hook chế độ chạy?) Nhưng một cách đơn giản để loại bỏ điều này hành vi là chỉ chộp lấy phương thức lệnh có ý định bằng cách đặt TAB thành phương thức dừng tab-tab-tab đơn giản hơn:

(định nghĩa khóa văn bản chế độ văn bản (kbd "TAB") 'tab-to-tab-stop)

Thử cái này:

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

Điều đó sẽ khiến TAB luôn chèn một ký tự TAB bằng chữ với các tab dừng mỗi 4 ký tự (nhưng chỉ trong chế độ Văn bản). Nếu đó không phải là những gì bạn yêu cầu, vui lòng mô tả hành vi bạn muốn xem.

Bạn có thể thêm các dòng mã này vào tệp .emacs của mình. Nó thêm một hook cho chế độ văn bản để sử dụng tab chèn thay vì thụt lề.

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

Tôi hy vọng nó sẽ giúp.

Chỉ cần thay đổi phong cách với c-set-style là đủ cho tôi.

Thêm phần này vào tệp .emacs của bạn:

Điều này sẽ đặt chiều rộng mà một tab được hiển thị thành 2 ký tự (thay đổi số 2 thành bất cứ thứ gì bạn muốn)

(setq default-tab-width 2)

Để đảm bảo rằng emacs thực sự sử dụng các tab thay vì dấu cách:

(global-set-key (kbd "TAB") 'self-insert-command)

Bên cạnh đó, mặc định cho các emacs khi đặt khoảng cách trên một tab là chuyển đổi nó thành khoảng trắng và sau đó xóa một khoảng trắng. Điều này có thể gây phiền nhiễu. Nếu bạn muốn nó chỉ xóa tab, bạn có thể làm điều này:

(setq c-backspace-function 'backward-delete-char)

Thưởng thức!

Đây là giải pháp duy nhất giúp một tab không bao giờ bị chèn cho tôi, mà không có trình tự hoặc chuyển đổi các tab thành khoảng trắng. Cả hai đều có vẻ đầy đủ, nhưng lãng phí:

(setq-default
    indent-tabs-mode nil
    tab-width 4
    tab-stop-list (quote (4 8))
)

Lưu ý rằng quote cần hai số để làm việc (nhưng không nhiều hơn!).

Ngoài ra, trong hầu hết các chế độ chính ( Pythonví dụ), thụt lề là tự động trong Emacs. Nếu bạn cần thụt lề bên ngoài tự động thụt lề, sử dụng:

M-i

Các tùy chỉnh có thể tạo bóng (setq tab width 4)để sử dụng setq-defaulthoặc cho Tùy chỉnh biết bạn đang làm gì. Tôi cũng gặp vấn đề tương tự như OP và đã sửa nó một mình, không cần điều chỉnh tab-stop-listhay bất kỳ insertchức năng nào :

(custom-set-variables
 '(tab-width 4 't)
 )

Tìm thấy nó hữu ích để thêm cái này ngay sau đó (một mẹo từ emacsWiki):

(defvaralias 'c-basic-offset 'tab-width)
(defvaralias 'cperl-indent-level 'tab-width)

Các câu trả lời tốt nhất đã không hoạt động cho đến khi tôi viết điều này trong tệp .emacs:

(global-set-key (kbd "TAB") 'self-insert-command)

Bạn đã thử chưa

(setq  tab-width  4)

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

Nhân tiện, đối với chế độ C , tôi thêm (setq-default c-basic-offset 4)vào .emacs. Xem http://www.emacswiki.org/emacs/InentingC để biết chi tiết.

Từ tệp init của tôi, khác vì tôi muốn khoảng trắng thay vì tab:

(add-hook 'sql-mode-hook
          (lambda ()
             (tiên lượng
               (setq-default tab width 4)
               (setq indent-tab-mode nil)
               (setq indent-line-function 'tab-to-tab-stop) 
               (sửa đổi cú pháp-mục nhập? _ "w"); bây giờ '_' không được coi là một dấu phân cách từ
               (sửa đổi-cú pháp-mục? - "w"); bây giờ '-' không được coi là một từ phân cách
               )))

Sửa đổi câu trả lời này mà không có bất kỳ hook:

(setq-default
  indent-tabs-mode t
  tab-stop-list (number-sequence 4 200 4)
  tab-width 4
  indent-line-function 'insert-tab)