Emacs функционирует для несимметричных сортировочных линий?

Я знаю, что вы можете сделать следующее для сортировки строк в emacs без чувствительности к регистру:

M-x set-variable [RETURN] sort-fold-case [RETURN] t [RETURN]
M-x sort-lines
M-x set-variable [RETURN] sort-fold-case [RETURN] nil [RETURN]

Но это раздражает делать каждый раз. Как я могу превратить это в функцию, чтобы мне не приходилось делать одно и то же снова и снова?

Ответы

Довольно просто:

(defun sort-lines-nocase ()
  (interactive)
  (let ((sort-fold-case t))
    (call-interactively 'sort-lines)))

Если вы всегда хотите сортировать регистр без учета регистра, попробуйте это в файле, используемом при запуске:

(custom-set-variables
 '(sort-fold-case t t)
)

Затем вы можете просто вызвать строки сортировки M-x.