From: Chong Yidong <cyd@stupidchicken.com>
Date: Thu, 12 Jun 2008 17:28:00 +0000 (+0000)
Subject: (longlines-search-forward, longlines-search-backward)
X-Git-Tag: emacs-pretest-23.0.90~4849
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=667adde1607cd29244213d76624c085083245796;p=emacs.git

(longlines-search-forward, longlines-search-backward)
(longlines-re-search-forward): Use a smarter search-spaces-regexp.
---

diff --git a/lisp/longlines.el b/lisp/longlines.el
index 76989c92af2..885909840a3 100644
--- a/lisp/longlines.el
+++ b/lisp/longlines.el
@@ -464,15 +464,15 @@ This is called by `window-configuration-change-hook'."
       'longlines-search-backward))))
 
 (defun longlines-search-forward (string &optional bound noerror count)
-  (let ((search-spaces-regexp "[ \n]+"))
+  (let ((search-spaces-regexp " *[ \n]"))
     (re-search-forward (regexp-quote string) bound noerror count)))
 
 (defun longlines-search-backward (string &optional bound noerror count)
-  (let ((search-spaces-regexp "[ \n]+"))
+  (let ((search-spaces-regexp " *[ \n]"))
     (re-search-backward (regexp-quote string) bound noerror count)))
 
 (defun longlines-re-search-forward (string &optional bound noerror count)
-  (let ((search-spaces-regexp "[ \n]"))
+  (let ((search-spaces-regexp " *[ \n]"))
     (re-search-forward string bound noerror count)))
 
 ;; Loading and saving