Mercurial > emacs
comparison lispref/positions.texi @ 54038:0bd7928bf5ac
(Text Lines): Don't add -1 in current-line.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 17 Feb 2004 01:07:22 +0000 |
| parents | 86085872de07 |
| children | 5745bf089073 |
comparison
equal
deleted
inserted
replaced
| 54037:96796d3ede2e | 54038:0bd7928bf5ac |
|---|---|
| 401 @example | 401 @example |
| 402 @group | 402 @group |
| 403 (defun current-line () | 403 (defun current-line () |
| 404 "Return the vertical position of point@dots{}" | 404 "Return the vertical position of point@dots{}" |
| 405 (+ (count-lines (window-start) (point)) | 405 (+ (count-lines (window-start) (point)) |
| 406 (if (= (current-column) 0) 1 0) | 406 (if (= (current-column) 0) 1 0))) |
| 407 -1)) | |
| 408 @end group | 407 @end group |
| 409 @end example | 408 @end example |
| 410 @end defun | 409 @end defun |
| 411 | 410 |
| 412 @defun line-number-at-pos &optional pos | 411 @defun line-number-at-pos &optional pos |