(goto-line): Remove unbalanced final parenthesis.

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ad601c58d13..7064db9cd1b 100644
--- 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 67d3bc6b8e8..68ef955431a 100644
--- 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."