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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2d420370d1422f176661a9d7564e627dd8ebad9c..493c8a4216c57e7901f2c9c0a2ff8c2c6704c617 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-23  Andreas Schwab  <schwab@suse.de>
 
        * menu-bar.el (menu-bar-showhide-fringe-ind-menu) [mixed]: Fix

diff --git a/lisp/info.el b/lisp/info.el
index 66ca4b61000010a53ebc3245ad07ce669252d79c..56b7e3e7fd013b617a5f736bdb2feca5fffe9fcd 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1829,8 +1829,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))))