リージョン内をソートする

wc-regionの中身コマンドをとっ換えただけのsort-regionを作ってみたが地味に便利。リージョン内を行ごとにソートする。

(defvar sort-script "sort")
(defun sort-region ()
  (interactive)
  (shell-command-on-region (region-beginning) (region-end) sort-script nil t))

ソートしたものを別バッファに出力するなら以下。

(defvar sort-script "sort")
(defun sort-region ()
  (interactive)
  (shell-command-on-region (region-beginning) (region-end) sort-script))