# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 765131937 0
# Node ID e631a154dc3b07e3408ffd4c8115e03c4c19b684
# Parent  ef938821c625547b445259b21786fbcf2b073e48
(occur-mode-goto-occurrence): Delete excess close paren.

diff -r ef938821c625 -r e631a154dc3b lisp/replace.el
--- a/lisp/replace.el	Thu Mar 31 16:37:20 1994 +0000
+++ b/lisp/replace.el	Thu Mar 31 16:38:57 1994 +0000
@@ -277,7 +277,7 @@
   (interactive)
   (let ((pos (occur-mode-find-occurrence)))
     (pop-to-buffer occur-buffer)
-    (goto-char (marker-position pos)))))
+    (goto-char (marker-position pos))))
 
 (defvar list-matching-lines-default-context-lines 0
   "*Default number of context lines to include around a `list-matching-lines'