# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1076980042 0
# Node ID 0bd7928bf5acfa02a3c4878ab3b9a12938463619
# Parent  96796d3ede2e6929a55baf72205c1c00f8cf9de9
(Text Lines): Don't add -1 in current-line.

diff -r 96796d3ede2e -r 0bd7928bf5ac lispref/positions.texi
--- 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