Emacsで行の左側に行番号を表示

Emacsでも表示しているテキストの各行の左側に行番号を表示させることができたはず…と思って調べた。

こちら(*1)にあるように、.emacsに以下を追加して、M-x linum-modeとするだけ。

(require 'linum)

Wikiの説明をパクって、以下のようなフォーマットを追加してみました。

(setq linum-format       (lambda (line)
        (propertize
         (format
          (let ((w (length (number-to-string (count-lines (point-min) (point-max))))))
            (concat " %0" (number-to-string w) "d ")) line) 'face 'linum)))

空白桁が0で埋まって表示されます。

*1 http://www.emacswiki.org/emacs/LineNumbers