一行あたりの文字数を指定して改行を挿入する

テキストを書いているときに、指定の文字数で改行を挿入する(指定数で折り返す、と言うのかな)、ていうことをコマンド一発でやりたかったので、簡単なものながら用意した。

;;; 一行あたりの文字数を指定してfill-region
(defun fill-region-with-N (num)
  ""
  (interactive "nfill-column value? ")
  (let ((fill-column num))
    (fill-region (region-beginning) (region-end)))
  )

上のコード片を .emacs に登録。

fill-region を利用してますんで、改行を挿入したい範囲(リージョン)を指定してから M-x fill-region-with-N を実行しておくんなまし。