Emacs indentation

режиме правки кода

Это какой именно? Ты что-то делаешь не так. За отступы для различных ЯП отвечают обычно их режимы - их и нужно ковырять. Как вариант реализовать в конфиге необходимые тебе функции и перебиндить клавиши, хотя первый метод менее костылен.

При этом вставляется именно TAB, а не 4 пробела.

Тебе сказать, как сделать, чтобы Emacs вставлял пробелы вместо табов, или сам нагуглишь?

Тебе сказать, как сделать, чтобы Emacs вставлял пробелы вместо табов

Мне надо сказать, как сделать чтобы он вставлял пробелы вместо табов при нажатии TAB для _всех_ ЯП, а не выполнял авто-индентацию. Ее надо забиндить на другую комбинацию. Как в любой IDE.

Хотя, судя потому через какую задницу работает банальное смещение блока текста влево, я не надеюсь что это возможно.

У меня примерно так:

(defun indent-params ()
    (setq-default c-default-style "bsd" c-basic-offset 4))

(add-hook 'c-mode-hook 'indent-params)

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

(require 'autopair)

(defun setup-indent ()
  (autopair-mode t)
  (local-set-key (kbd "RET") 'newline-and-indent))

(add-hook 'c-mode-common-hook 'setup-indent)

Используется autopair. Наверное, можно и проще, я не разбирался.

Спасибо, но штука в том, что я хочу изменить дефолтное поведение, потому что редактировать надо исходники на нескольких языках.

Спасибо, но штука в том, что я хочу изменить дефолтное поведение, потому что редактировать надо исходники на нескольких языках.

В голову приходят такие варианты:

• Вешать хук на все нужные режимы (я бы сделал так).
• Вешать хук на find-file-hook.
• Писать свой глобальный минорный режим и вешать хук в него.

А в этом хуке настраивать indent-tabs-mode, indent-line-function, etc.

Да, еще можно попробовать в глобальном минорном режиме перебиндить TAB. Или в каждом нужном режиме.

ё-моё ну так забиндь на кнопку таб (insert-string " ") а на кнопки S-C-F (indent-line)

(global-set-key [tab] #'(lambda () (insert "    ")))
(global-set-key (kbd "C-S-F") #'indent-according-to-mode)

Да. Почти то что надо!

(defun indent-region (N)
  (interactive "p")
  (if (use-region-p)
      (progn (indent-rigidly (region-beginning) (region-end) (* N 4))
             (setq deactivate-mark nil))
    (self-insert-command N)))

(insert "    ")

Пришлось подучить elisp. Победил. Финальный вариант.

(setq tab-width 4)

(defun indent ()
  (interactive)
  (if (use-region-p)
      (progn
        (indent-rigidly (region-beginning) (region-end) tab-width)
        (setq deactivate-mark nil)
      )
      (progn
        (insert (apply 'concat (make-list tab-width " ")))
      )
  )
)

(defun unindent ()
  (interactive)
  (if (use-region-p)
      (progn (indent-rigidly (region-beginning) (region-end) (- tab-width))
             (setq deactivate-mark nil))
  )
)

(global-set-key [tab] 'indent)
(global-set-key ">" 'indent)
(global-set-key "<" 'unindent)

Ну, если уж тебе это не осилить... то зачем тебе емакс)

(global-set-key [tab] #'(lambda () (if (use-region-p)
                                      (indent-region)
                                     (insert "    "))))

Лень в Lisp разбираться было. Сорри, осилил, отписался выше.

(global-set-key (kbd «C-S-F») #'indent-according-to-mode)

+ правильный ответ на второй вопрос.

(global-set-key (kbd "C-S-f") 'indent-for-tab-command)