From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 8 Oct 2004 17:02:16 +0000 (+0000)
Subject: (isearch-yank-line): C-y yanks to next EOL, not end of current line.
X-Git-Tag: ttn-vms-21-2-B4~4674
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a1883913f882a8a6e32bd08bfd8e6f4754b348db;p=emacs.git

(isearch-yank-line): C-y yanks to next EOL, not end of current line.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 236993fd00b..f71d6800846 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,4 +1,9 @@
-2004-10-09  Masatake YAMATO  <jet@gyve.org>
+2004-10-08  Alan Mackenzie  <acm@muc.de>
+
+	* isearch.el (isearch-yank-line): C-y yanks to next EOL, not end
+	of current line.
+
+2004-10-08  Masatake YAMATO  <jet@gyve.org>
 
 	* server.el (server-process-filter): Wrap `process-send-region' 
 	by `condition-case' to guard the case when the pipe to PROC is 
diff --git a/lisp/isearch.el b/lisp/isearch.el
index 96a3e0e0ac2..45ac5b4d286 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -1254,8 +1254,8 @@ might return the position of the end of the line."
 (defun isearch-yank-line ()
   "Pull rest of line from buffer into search string."
   (interactive)
-  (isearch-yank-internal 'line-end-position))
-
+  (isearch-yank-internal
+   (lambda () (line-end-position (if (eolp) 2 1)))))
 
 (defun isearch-search-and-update ()
   ;; Do the search and update the display.