emacs - スペースを挿入して、選択した行を移動するためのemacs（悪）バインディング

Question

emacs バインディング (悪モード) で選択範囲を取得し、一度に 1 つのスペースを右または左に移動する必要があります。たとえば、5 行を強調表示して [some-key] を押すと、5 行すべてが 1 スペース右にスライドし、[shift some-key] を押すとすべての行が 1 スペース左にスライドします。

Answer 1

これは、私が最初に投稿したアプローチよりも優れたアプローチかもしれません。

(defun jg-indent (start end count)
  (interactive "r\np")
  (save-excursion
    (let ((start (if (use-region-p)
                     start
                   (beginning-of-line)
                   (point)))
          (end (if (use-region-p)
                   end
                 (end-of-line)
                 (point))))
      (indent-rigidly start end count))))

(defun jg-unindent (start end)
  (interactive "r")
  (jg-indent start end -1))

(global-set-key "\C-c=" 'jg-indent)
(global-set-key "\C-c+" 'jg-unindent)