(isearch-yank-line): Let-bind `inhibit-field-text-motion' to t.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 08832bd613e0f7b4c96cc162b89bb5805123c8e8..2ef7629a5b49caacdc94a8bce35212abbe1c8688 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-07-09  Romain Francoise  <romain@orebokech.com>
+
+       * isearch.el (isearch-yank-line): Let-bind `inhibit-field-text-motion'
+       to t.
+
 2006-07-09  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * textmodes/fill.el (fill-region-as-paragraph): Refine last change.

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 014c8efe18822b8215d427a9554e4e1d70ad55e3..4dbb29d99dccbc87ad0301d1696f72f31de08507 100644 (file)
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -1357,7 +1357,8 @@ might return the position of the end of the line."
   "Pull rest of line from buffer into search string."
   (interactive)
   (isearch-yank-internal
-   (lambda () (line-end-position (if (eolp) 2 1)))))
+   (lambda () (let ((inhibit-field-text-motion t))
+               (line-end-position (if (eolp) 2 1))))))
 
 (defun isearch-search-and-update ()
   ;; Do the search and update the display.