diff options
| -rw-r--r-- | lisp/locate.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/locate.el b/lisp/locate.el index 7cc3e0a2102..b3dc0766192 100644 --- a/lisp/locate.el +++ b/lisp/locate.el | |||
| @@ -2,7 +2,7 @@ | |||
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1996, 1998 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1996, 1998 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Author: Peter Breton <pbreton@i-kinetics.com> | 5 | ;; Author: Peter Breton <pbreton@cs.umb.edu> |
| 6 | 6 | ||
| 7 | ;; This file is part of GNU Emacs. | 7 | ;; This file is part of GNU Emacs. |
| 8 | 8 | ||
| @@ -252,7 +252,6 @@ | |||
| 252 | ;; From SQL-mode | 252 | ;; From SQL-mode |
| 253 | (defun locate-current-line-number () | 253 | (defun locate-current-line-number () |
| 254 | "Return the current line number, as an integer." | 254 | "Return the current line number, as an integer." |
| 255 | (interactive) | ||
| 256 | (+ (count-lines (point-min) (point)) | 255 | (+ (count-lines (point-min) (point)) |
| 257 | (if (eq (current-column) 0) | 256 | (if (eq (current-column) 0) |
| 258 | 1 | 257 | 1 |