(Info-isearch-search): Always return point.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 25e5e7fba0451d715b33fa5c9c39137f8d7f8e52..49747f9bfb95c6e675ffd2930d3f0724ed3f4a15 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-03-25  Johan Bockg\e$(Q)[\e(Brd  <bojohan@gnu.org>
+
+       * info.el (Info-isearch-search): Always return point.
+
 2008-03-25  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * diff-mode.el (diff-remembered-defdir): New var.

diff --git a/lisp/info.el b/lisp/info.el
index 5a0c4ce6611a9cb94fa17618e7b8ff75d6812c25..f291bad2a956c0da71290a68ed228557da046da5 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1834,8 +1834,8 @@ If DIRECTION is `backward', search in the reverse direction."
                         (unless isearch-forward 'backward))
          (Info-search (if isearch-regexp string (regexp-quote string))
                       bound noerror count
-                      (unless isearch-forward 'backward))
-         (point)))
+                      (unless isearch-forward 'backward)))
+       (point))
     (let ((isearch-search-fun-function nil))
       (isearch-search-fun))))