From: Luc Teirlinck <teirllm@auburn.edu>
Date: Sat, 5 Mar 2005 19:12:31 +0000 (+0000)
Subject: (goto-line): Remove unbalanced final parenthesis.
X-Git-Tag: ttn-vms-21-2-B4~1979
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f38c52df07c6a20c05adb75f7cb386c88eddd845;p=emacs.git

(goto-line): Remove unbalanced final parenthesis.
---

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."