changeset 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 96796d3ede2e
children 69b7ec693d94
files lispref/positions.texi
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lispref/positions.texi	Tue Feb 17 01:06:10 2004 +0000
+++ b/lispref/positions.texi	Tue Feb 17 01:07:22 2004 +0000
@@ -403,8 +403,7 @@
 (defun current-line ()
   "Return the vertical position of point@dots{}"
   (+ (count-lines (window-start) (point))
-     (if (= (current-column) 0) 1 0)
-     -1))
+     (if (= (current-column) 0) 1 0)))
 @end group
 @end example
 @end defun