[xyzzy:08248] Re: 表示行の合計

[Nobuyoshi Nakada <nobu.nokada@xxxxxxxxxxxx>]

なかだです。

At Tue, 7 May 2002 21:32:11 +0900,
Epi wrote:
> こんな具合ですかね。
> 現在のカーソルが指している文字の取り方がよくわからなかったので
> ちょっと汚いですが。

char-afterとかchar-beforeというのがありますが、(goto-char
(point-max))するなら(bolp)という手も。

> (defun count-virtual-columns (bf)
>   (set-buffer bf)
>   (save-excursion
> 	(save-restriction
> 	  (widen)
> 	  (goto-char (point-max))
  	  (if (bolp)
> 		  (1- (current-virtual-line-number))
> 		(current-virtual-line-number)))))

-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦