🚀 go-pugleaf

倉谷と申します。

nak-k@aat.mtci.ne.jp (Kiuchi Kan) writes:
> mule の行番号表示を表示させたいのですがどのようにすれば
> よろしいでしょうか？

以前、Emacs-lispの勉強のために、行番号を付加するプログラム
を書いたことがあります。

下記のソースを.emacsに追加して、M-x kk-insert-line-numberと
打鍵すれば行番号を付加できます。確認は、Meadow 1.00(GNU
Emacs 20.2.1相当)でしております。

これでどうでしょうか？

---- ここから ---- ここから ---- ここから ---- ここから ---- 

;;; 行番号を付加する関数
(defun kk-insert-line-number()                                         
"バッファに行番号を自動的に付加する命令。プログラムソース出力に使う。"
(interactive)                                                          
(save-excursion                                                        
; 1行目の処理                                                         
  (goto-char(point-min))                    ; バッファの最前行へ移動
; 2行目以降                                                           
(setq kk-counter 1)                         ; カウンタ初期化
  (while(bolp)                              ; 行の最初であるならループ続行
       (beginning-of-line)                  ; 行頭にカーソルを移動
       (insert (format "%3d " kk-counter))  ;フォーマット変換             
       (forward-line 1)                     ; 一行進める                      
       (setq kk-counter (+ kk-counter 1))))); カウンタのインクリメント

---- ここまで ---- ここまで ---- ここまで ---- ここまで ---- 

#　改善したらよい点などを指摘をしてください > 上級者の方