changeset 71737:efe1646601d6

(isearch-yank-line): Let-bind `inhibit-field-text-motion' to t.
author Romain Francoise <romain@orebokech.com>
date Sun, 09 Jul 2006 11:04:19 +0000
parents 125374685aec
children c346b98c98c8
files lisp/ChangeLog lisp/isearch.el
diffstat 2 files changed, 7 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Sun Jul 09 05:20:42 2006 +0000
+++ b/lisp/ChangeLog	Sun Jul 09 11:04:19 2006 +0000
@@ -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.
--- a/lisp/isearch.el	Sun Jul 09 05:20:42 2006 +0000
+++ b/lisp/isearch.el	Sun Jul 09 11:04:19 2006 +0000
@@ -1357,7 +1357,8 @@
   "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.