(goto-line): Remove unbalanced final parenthesis.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ad601c58d13eb6d418958f879e9efd59f22cb02e..7064db9cd1b91d75612282ad69ef7703b705043d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-03-05  Luc Teirlinck  <teirllm@auburn.edu>
+
+       * simple.el (goto-line): Remove unbalanced final parentheses.
+
 2005-03-05  Richard M. Stallman  <rms@gnu.org>
 
        * simple.el (goto-line): Use a number at point as the default.

diff --git a/lisp/simple.el b/lisp/simple.el
index 67d3bc6b8e88a3c11fed5a192480ab9ab506a0d4..68ef955431a950145119377e348dfe35e73a2149 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -780,7 +780,7 @@ If there's a number in the buffer at point, it is the default for ARG."
     (goto-char 1)
     (if (eq selective-display t)
        (re-search-forward "[\n\C-m]" nil 'end (1- arg))
-      (forward-line (1- arg))))))
+      (forward-line (1- arg)))))
 
 (defun count-lines-region (start end)
   "Print number of lines and characters in the region."