(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
@defun line-number-at-pos &optional pos
@cindex line number
This function returns the line number in the current buffer
-corresponding the buffer position @var{pos}. If @var{pos} is nil or
-omitted, the current buffer position is used.
+corresponding the buffer position @var{pos}. If @var{pos} is @code{nil}
+or omitted, the current buffer position is used.
@end defun
@ignore